home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / unix / volume11 / tcsh.4.3 / part02 < prev    next >
Encoding:
Text File  |  1987-09-27  |  60.3 KB  |  2,928 lines
  1. #! /bin/sh
  2. # This is a shell archive, meaning:
  3. # 1. Remove everything above the #! /bin/sh line.
  4. # 2. Save the resulting text in a file.
  5. # 3. Execute the file with /bin/sh (not csh) to create:
  6. #    DIFFS.2
  7. # This archive created: Thu Sep 24 16:28:19 1987
  8. export PATH; PATH=/bin:/usr/bin:$PATH
  9. if test -f 'DIFFS.2'
  10. then
  11.     echo shar: "will not over-write existing file 'DIFFS.2'"
  12. else
  13. cat << \SHAR_EOF > 'DIFFS.2'
  14. *** sh.glob.c    Tue May 13 01:27:18 1986
  15. --- /usr/src/local/tcsh/sh.glob.c    Mon Aug 17 21:32:21 1987
  16. ***************
  17. *** 9,15
  18.   #endif
  19.   
  20.   #include "sh.h"
  21. ! #include <sys/dir.h>
  22.   
  23.   /*
  24.    * C Shell
  25.  
  26. --- 9,15 -----
  27.   #endif
  28.   
  29.   #include "sh.h"
  30. ! /* #include <sys/dir.h> */
  31.   
  32.   /*
  33.    * C Shell
  34. ***************
  35. *** 118,123
  36.   sortscmp(a1, a2)
  37.       char **a1, **a2;
  38.   {
  39.   
  40.        return (strcmp(*a1, *a2));
  41.   }
  42.  
  43. --- 118,132 -----
  44.   sortscmp(a1, a2)
  45.       char **a1, **a2;
  46.   {
  47. +     if (!a1)            /* check for NULL */
  48. +         return (a2?1:0);
  49. +     if (!a2)
  50. +         return (-1);
  51. +     
  52. +     if (!*a1)            /* check for NULL */
  53. +         return (*a2?1:0);
  54. +     if (!*a2)
  55. +         return (-1);
  56.   
  57.        return (strcmp(*a1, *a2));
  58.   }
  59. ***************
  60. *** 131,136
  61.   
  62.       sgpathp = gpathp;
  63.       cs = as;
  64.       if (*cs == '~' && gpathp == gpath) {
  65.           addpath('~');
  66.           for (cs++; letter(*cs) || digit(*cs) || *cs == '-';)
  67.  
  68. --- 140,164 -----
  69.   
  70.       sgpathp = gpathp;
  71.       cs = as;
  72. +     /*
  73. +      * kfk - 17 Jan 1984 - stack hack
  74. +      * allows user to get at arbitrary dir names in stack.
  75. +      */
  76. +     if (*cs == '=' && gpathp == gpath) {
  77. +         addpath ('=');
  78. +         if (digit (*++cs) || *cs == '-') {
  79. +             int dig;
  80. +             dig = (*cs == '-') ? -1 : *cs - '0';
  81. +             cs++;
  82. +             if (*cs && *cs != '/')
  83. +                 error ("Stack hack: =<dig>{/path...}");
  84. +             getstakd (gpath, dig, 1);
  85. +                 /* last "1" = call error if needed */
  86. +             gpathp = strend (gpath);
  87. +         }
  88. +     }
  89. +     /* kfk - end stack hack change */
  90. + 
  91.       if (*cs == '~' && gpathp == gpath) {
  92.           addpath('~');
  93.           for (cs++; letter(*cs) || digit(*cs) || *cs == '-';)
  94. ***************
  95. *** 295,301
  96.       register char *sentp;
  97.       char sglobbed = globbed;
  98.   
  99. !     if (*s == '.' && *p != '.')
  100.           return (0);
  101.       sentp = entp;
  102.       entp = s;
  103.  
  104. --- 323,329 -----
  105.       register char *sentp;
  106.       char sglobbed = globbed;
  107.   
  108. !     if (*s == '.' && *p != '.') /* PWP: this makes [.]login != .login */
  109.           return (0);
  110.       sentp = entp;
  111.       entp = s;
  112. ***************
  113. *** 309,315
  114.       register char *s, *p;
  115.   {
  116.       register int scc;
  117. !     int ok, lc;
  118.       char *sgpathp;
  119.       struct stat stb;
  120.       int c, cc;
  121.  
  122. --- 337,343 -----
  123.       register char *s, *p;
  124.   {
  125.       register int scc;
  126. !     int ok, lc, notin;
  127.       char *sgpathp;
  128.       struct stat stb;
  129.       int c, cc;
  130. ***************
  131. *** 322,328
  132.           case '{':
  133.               return (execbrc(p - 1, s - 1));
  134.   
  135. !         case '[':
  136.               ok = 0;
  137.               lc = 077777;
  138.               while (cc = *p++) {
  139.  
  140. --- 350,357 -----
  141.           case '{':
  142.               return (execbrc(p - 1, s - 1));
  143.   
  144. !         case '[':    /* PWP -- BRACKET IS HERE!! */
  145. !             if (!scc) return 0; /* if at end if string */
  146.               ok = 0;
  147.               lc = 077777;
  148.               if (*p == '^') {
  149. ***************
  150. *** 325,330
  151.           case '[':
  152.               ok = 0;
  153.               lc = 077777;
  154.               while (cc = *p++) {
  155.                   if (cc == ']') {
  156.                       if (ok)
  157.  
  158. --- 354,364 -----
  159.               if (!scc) return 0; /* if at end if string */
  160.               ok = 0;
  161.               lc = 077777;
  162. +             if (*p == '^') {
  163. +                 notin = 1;
  164. +                 p++;
  165. +             } else
  166. +                 notin = 0;
  167.               while (cc = *p++) {
  168.                   if (cc == ']') {
  169.                       if (notin) { /* PWP for not in list */
  170. ***************
  171. *** 327,335
  172.               lc = 077777;
  173.               while (cc = *p++) {
  174.                   if (cc == ']') {
  175. !                     if (ok)
  176. !                         break;
  177. !                     return (0);
  178.                   }
  179.                   if (cc == '-') {
  180.                       if (lc <= scc && scc <= *p++)
  181.  
  182. --- 361,377 -----
  183.                   notin = 0;
  184.               while (cc = *p++) {
  185.                   if (cc == ']') {
  186. !                     if (notin) { /* PWP for not in list */
  187. !                         if (!ok)
  188. !                             break;
  189. !                         else
  190. !                             return (0);
  191. !                     } else {
  192. !                         if (ok)
  193. !                             break;
  194. !                         else
  195. !                             return (0);
  196. !                     }
  197.                   }
  198.                   if (cc == '-') {
  199.                       if (lc <= scc && scc <= *p++)
  200. ***************
  201. *** 335,341
  202.                       if (lc <= scc && scc <= *p++)
  203.                           ok++;
  204.                   } else
  205. !                     if (scc == (lc = cc))
  206.                           ok++;
  207.               }
  208.               if (cc == 0)
  209.  
  210. --- 377,383 -----
  211.                       if (lc <= scc && scc <= *p++)
  212.                           ok++;
  213.                   } else
  214. !                     if (scc && (scc == (lc = cc)))
  215.                           ok++;
  216.               }
  217.               if (cc == 0)
  218. ***************
  219. *** 393,399
  220.       register char *s, *p;
  221.   {
  222.       register int scc;
  223. !     int ok, lc;
  224.       int c, cc;
  225.   
  226.       for (;;) {
  227.  
  228. --- 435,441 -----
  229.       register char *s, *p;
  230.   {
  231.       register int scc;
  232. !     int ok, lc, notin;
  233.       int c, cc;
  234.   
  235.       for (;;) {
  236. ***************
  237. *** 400,406
  238.           scc = *s++ & TRIM;
  239.           switch (c = *p++) {
  240.   
  241. !         case '[':
  242.               ok = 0;
  243.               lc = 077777;
  244.               while (cc = *p++) {
  245.  
  246. --- 442,449 -----
  247.           scc = *s++ & TRIM;
  248.           switch (c = *p++) {
  249.   
  250. !         case '[':    /* PWP -- HERE TOO!! */
  251. !             if (!scc) return 0; /* if at end if string */
  252.               ok = 0;
  253.               lc = 077777;
  254.               if (*p == '^') {
  255. ***************
  256. *** 403,408
  257.           case '[':
  258.               ok = 0;
  259.               lc = 077777;
  260.               while (cc = *p++) {
  261.                   if (cc == ']') {
  262.                       if (ok)
  263.  
  264. --- 446,456 -----
  265.               if (!scc) return 0; /* if at end if string */
  266.               ok = 0;
  267.               lc = 077777;
  268. +             if (*p == '^') {
  269. +                 notin = 1;
  270. +                 p++;
  271. +             } else
  272. +                 notin = 0;
  273.               while (cc = *p++) {
  274.                   if (cc == ']') {
  275.                       if (notin) { /* PWP for not in list */
  276. ***************
  277. *** 405,410
  278.               lc = 077777;
  279.               while (cc = *p++) {
  280.                   if (cc == ']') {
  281.                       if (ok)
  282.                           break;
  283.                       return (0);
  284.  
  285. --- 453,464 -----
  286.                   notin = 0;
  287.               while (cc = *p++) {
  288.                   if (cc == ']') {
  289. +                     if (notin) { /* PWP for not in list */
  290. +                         if (!ok)
  291. +                         break;
  292. +                         else
  293. +                         return (0);
  294. +                     } else {
  295.                       if (ok)
  296.                           break;
  297.                           else
  298. ***************
  299. *** 407,412
  300.                   if (cc == ']') {
  301.                       if (ok)
  302.                           break;
  303.                       return (0);
  304.                   }
  305.                   if (cc == '-') {
  306.  
  307. --- 461,467 -----
  308.                       } else {
  309.                       if (ok)
  310.                           break;
  311. +                         else
  312.                       return (0);
  313.                   }
  314.                   }
  315. ***************
  316. *** 409,414
  317.                           break;
  318.                       return (0);
  319.                   }
  320.                   if (cc == '-') {
  321.                       if (lc <= scc && scc <= *p++)
  322.                           ok++;
  323.  
  324. --- 464,470 -----
  325.                           else
  326.                       return (0);
  327.                   }
  328. +                 }
  329.                   if (cc == '-') {
  330.                       if (lc <= scc && scc <= *p++)
  331.                           ok++;
  332. ***************
  333. *** 413,419
  334.                       if (lc <= scc && scc <= *p++)
  335.                           ok++;
  336.                   } else
  337. !                     if (scc == (lc = cc))
  338.                           ok++;
  339.               }
  340.               if (cc == 0)
  341.  
  342. --- 469,475 -----
  343.                       if (lc <= scc && scc <= *p++)
  344.                           ok++;
  345.                   } else
  346. !                     if (scc && (scc == (lc = cc)))
  347.                           ok++;
  348.               }
  349.               if (cc == 0)
  350. ***************
  351. *** 503,509
  352.       register char *p, c;
  353.   
  354.       while (p = *t++) {
  355. !         if (*p == '~')
  356.               gflag |= 2;
  357.           else if (*p == '{' && (p[1] == '\0' || p[1] == '}' && p[2] == '\0'))
  358.               continue;
  359.  
  360. --- 559,566 -----
  361.       register char *p, c;
  362.   
  363.       while (p = *t++) {
  364. !             /* added additional '=' test for stack hack */
  365. !         if ((*p == '~') || (*p == '='))
  366.               gflag |= 2;
  367.           else if (*p == '{' && (p[1] == '\0' || p[1] == '}' && p[2] == '\0'))
  368.               continue;
  369. *** sh.h    Sat Mar 29 07:37:09 1986
  370. --- /usr/src/local/tcsh/sh.h    Mon Aug 17 22:48:18 1987
  371. ***************
  372. *** 8,13
  373.   
  374.   #include <sys/time.h>
  375.   #include <sys/resource.h>
  376.   #include <sys/param.h>
  377.   #include <sys/stat.h>
  378.   #include <sys/signal.h>
  379.  
  380. --- 8,16 -----
  381.   
  382.   #include <sys/time.h>
  383.   #include <sys/resource.h>
  384. + #ifdef    SVID
  385. + #include <sys/types.h>
  386. + #endif
  387.   #include <sys/param.h>
  388.   #include <sys/stat.h>
  389.   #include <sys/signal.h>
  390. ***************
  391. *** 28,33
  392.   
  393.   #define    isdir(d)    ((d.st_mode & S_IFMT) == S_IFDIR)
  394.   
  395.   typedef    char    bool;
  396.   
  397.   #define    eq(a, b)    (strcmp(a, b) == 0)
  398.  
  399. --- 31,78 -----
  400.   
  401.   #define    isdir(d)    ((d.st_mode & S_IFMT) == S_IFDIR)
  402.   
  403. + #include <sys/ioctl.h>
  404. + 
  405. + #ifndef SVID
  406. + #include <sgtty.h>
  407. + #include <sys/dir.h>
  408. + #else SVID
  409. + # ifdef OREO
  410. + #include <sgtty.h>
  411. + #include <sys/dir.h>
  412. + # else OREO
  413. + #include "dir.h"
  414. + # endif OREO
  415. + #endif SVID
  416. + 
  417. + /* #include <ctype.h> */
  418. + #include <pwd.h>
  419. + 
  420. + #ifdef SVID
  421. + # ifndef pyr
  422. + #include <time.h>
  423. + # endif pyr
  424. + #include <termio.h>
  425. + #endif
  426. + 
  427. +     
  428. + /*
  429. +  * kfk 26 Jan 1984 - for login watch functions.
  430. +  */
  431. + #include <utmp.h>
  432. + struct who {
  433. +     struct who *w_next;
  434. +     struct who *w_prev;
  435. +     char w_name[10];
  436. +     char w_new[10];
  437. +     char w_tty[10];
  438. +     int w_status;
  439. + };
  440. + #define ONLINE        01
  441. + #define OFFLINE        02
  442. + #define CHANGED        04
  443. + #define ANNOUNCE    010
  444. + /* kfk - end change */
  445.   typedef    char    bool;
  446.   
  447.   /* kfk - additions to support scheduled commands */
  448. ***************
  449. *** 30,35
  450.   
  451.   typedef    char    bool;
  452.   
  453.   #define    eq(a, b)    (strcmp(a, b) == 0)
  454.   
  455.   /*
  456.  
  457. --- 75,89 -----
  458.   /* kfk - end change */
  459.   typedef    char    bool;
  460.   
  461. + /* kfk - additions to support scheduled commands */
  462. + struct sched_event {
  463. +     struct    sched_event    *t_next;
  464. +     long            t_when;
  465. +     char            **t_lex;
  466. + };
  467. + extern    long    time();
  468. + /* kfk - end change */
  469. + 
  470.   #define    eq(a, b)    (strcmp(a, b) == 0)
  471.   
  472.   /*
  473. ***************
  474. *** 51,59
  475.   bool    setintr;        /* Set interrupts on/off -> Wait intr... */
  476.   bool    timflg;            /* Time the next waited for command */
  477.   bool    havhash;        /* path hashing is available */
  478. - #ifdef FILEC
  479. - bool    filec;            /* doing filename expansion */
  480. - #endif
  481.   
  482.   /*
  483.    * Global i/o info
  484.  
  485. --- 105,110 -----
  486.   bool    setintr;        /* Set interrupts on/off -> Wait intr... */
  487.   bool    timflg;            /* Time the next waited for command */
  488.   bool    havhash;        /* path hashing is available */
  489.   
  490.   /*
  491.    * Global i/o info
  492. ***************
  493. *** 66,71
  494.   int    errno;            /* Error from C library routines */
  495.   char    *shtemp;        /* Temp name for << shell files in /tmp */
  496.   struct    timeval time0;        /* Time at which the shell started */
  497.   struct    rusage ru0;
  498.   
  499.   /*
  500.  
  501. --- 117,123 -----
  502.   int    errno;            /* Error from C library routines */
  503.   char    *shtemp;        /* Temp name for << shell files in /tmp */
  504.   struct    timeval time0;        /* Time at which the shell started */
  505. + #ifndef OREO
  506.   struct    rusage ru0;
  507.   #endif OREO
  508.   
  509. ***************
  510. *** 67,72
  511.   char    *shtemp;        /* Temp name for << shell files in /tmp */
  512.   struct    timeval time0;        /* Time at which the shell started */
  513.   struct    rusage ru0;
  514.   
  515.   /*
  516.    * Miscellany
  517.  
  518. --- 119,125 -----
  519.   struct    timeval time0;        /* Time at which the shell started */
  520.   #ifndef OREO
  521.   struct    rusage ru0;
  522. + #endif OREO
  523.   
  524.   /*
  525.    * Miscellany
  526. ***************
  527. *** 79,84
  528.   /* If tpgrp is -1, leave tty alone! */
  529.   int    opgrp;            /* Initial pgrp and tty pgrp */
  530.   int    oldisc;            /* Initial line discipline or -1 */
  531.   
  532.   /*
  533.    * These are declared here because they want to be
  534.  
  535. --- 132,140 -----
  536.   /* If tpgrp is -1, leave tty alone! */
  537.   int    opgrp;            /* Initial pgrp and tty pgrp */
  538.   int    oldisc;            /* Initial line discipline or -1 */
  539. + char PromptBuf[256];        /* buffer for the actual printed prompt.
  540. +                    this is used in tenex.c and sh.c for
  541. +                    pegets.c */
  542.   
  543.   /*
  544.    * These are declared here because they want to be
  545. ***************
  546. *** 369,374
  547.       struct    wordent Hlex;
  548.       int    Hnum;
  549.       int    Href;
  550.       struct    Hist *Hnext;
  551.   } Histlist;
  552.   
  553.  
  554. --- 425,431 -----
  555.       struct    wordent Hlex;
  556.       int    Hnum;
  557.       int    Href;
  558. +     long    Htime;
  559.       struct    Hist *Hnext;
  560.   } Histlist;
  561.   
  562. ***************
  563. *** 423,428
  564.   char    *index();
  565.   struct    biltins *isbfunc();
  566.   off_t    lseek();
  567.   char    *operate();
  568.   int    phup();
  569.   int    pintr();
  570.  
  571. --- 480,486 -----
  572.   char    *index();
  573.   struct    biltins *isbfunc();
  574.   off_t    lseek();
  575. + struct    tm *localtime();
  576.   char    *operate();
  577.   int    phup();
  578.   int    pintr();
  579. ***************
  580. *** 471,473
  581.       char    *iname;        /* name from /usr/include */
  582.       char    *pname;        /* print name */
  583.   } mesg[];
  584.  
  585. --- 529,534 -----
  586.       char    *iname;        /* name from /usr/include */
  587.       char    *pname;        /* print name */
  588.   } mesg[];
  589. + 
  590. + #define    sighold(sig)    sigblock(sigmask(sig))
  591. +     
  592. *** sh.hist.c    Thu Jun  6 13:15:33 1985
  593. --- /usr/src/local/tcsh/sh.hist.c    Mon Aug 17 21:32:24 1987
  594. ***************
  595. *** 53,58
  596.       register struct Hist *np;
  597.   
  598.       np = (struct Hist *) xalloc(sizeof *np);
  599.       np->Hnum = np->Href = event;
  600.       if (docopy)
  601.           copylex(&np->Hlex, lp);
  602.  
  603. --- 53,59 -----
  604.       register struct Hist *np;
  605.   
  606.       np = (struct Hist *) xalloc(sizeof *np);
  607. +     time(&(np->Htime));
  608.       np->Hnum = np->Href = event;
  609.       if (docopy)
  610.           copylex(&np->Hlex, lp);
  611. ***************
  612. *** 135,140
  613.       register struct Hist *hp;
  614.       int hflg;
  615.   {
  616.   
  617.       if (hflg == 0)
  618.           printf("%6d\t", hp->Hnum);
  619.  
  620. --- 136,143 -----
  621.       register struct Hist *hp;
  622.       int hflg;
  623.   {
  624. +     struct tm *t;
  625. +     char ampm = 'a';
  626.   
  627.       if (hflg == 0)
  628.       {
  629. ***************
  630. *** 137,142
  631.   {
  632.   
  633.       if (hflg == 0)
  634.           printf("%6d\t", hp->Hnum);
  635.       prlex(&hp->Hlex);
  636.   }
  637.  
  638. --- 140,146 -----
  639.       char ampm = 'a';
  640.   
  641.       if (hflg == 0)
  642. +     {
  643.           printf("%6d\t", hp->Hnum);
  644.           t = localtime(&hp->Htime);
  645.           if (t->tm_hour >= 12)
  646. ***************
  647. *** 138,142
  648.   
  649.       if (hflg == 0)
  650.           printf("%6d\t", hp->Hnum);
  651.       prlex(&hp->Hlex);
  652.   }
  653.  
  654. --- 142,157 -----
  655.       if (hflg == 0)
  656.       {
  657.           printf("%6d\t", hp->Hnum);
  658. +         t = localtime(&hp->Htime);
  659. +         if (t->tm_hour >= 12)
  660. +         {
  661. +             if (t->tm_hour > 12)
  662. +                 t->tm_hour -= 12;
  663. +             ampm = 'p';
  664. +         }
  665. +         else if (t->tm_hour == 0)
  666. +             t->tm_hour = 12;
  667. +         printf ("%2d:%02d%cm\t", t->tm_hour, t->tm_min, ampm);
  668. +     }
  669.       prlex(&hp->Hlex);
  670.   }
  671. *** sh.init.c    Thu Jun  6 13:15:48 1985
  672. --- /usr/src/local/tcsh/sh.init.c    Tue Aug 18 21:57:22 1987
  673. ***************
  674. *** 16,21
  675.   
  676.   extern    int doalias();
  677.   extern    int dobg();
  678.   extern    int dobreak();
  679.   extern    int dochngd();
  680.   extern    int docontin();
  681.  
  682. --- 16,22 -----
  683.   
  684.   extern    int doalias();
  685.   extern    int dobg();
  686. + extern    int dobind();
  687.   extern    int dobreak();
  688.   extern    int dochngd();
  689.   extern    int docontin();
  690. ***************
  691. *** 37,42
  692.   extern    int dojobs();
  693.   extern    int dokill();
  694.   extern    int dolet();
  695.   extern    int dolimit();
  696.   extern    int dologin();
  697.   extern    int dologout();
  698.  
  699. --- 38,44 -----
  700.   extern    int dojobs();
  701.   extern    int dokill();
  702.   extern    int dolet();
  703. + #ifndef OREO
  704.   extern    int dolimit();
  705.   #endif
  706.   extern    int dolog();
  707. ***************
  708. *** 38,43
  709.   extern    int dokill();
  710.   extern    int dolet();
  711.   extern    int dolimit();
  712.   extern    int dologin();
  713.   extern    int dologout();
  714.   #ifdef NEWGRP
  715.  
  716. --- 40,47 -----
  717.   extern    int dolet();
  718.   #ifndef OREO
  719.   extern    int dolimit();
  720. + #endif
  721. + extern    int dolog();
  722.   extern    int dologin();
  723.   extern    int dologout();
  724.   #ifdef NEWGRP
  725. ***************
  726. *** 50,55
  727.   extern    int dopopd();
  728.   extern    int dopushd();
  729.   extern    int dorepeat();
  730.   extern    int doset();
  731.   extern    int dosetenv();
  732.   extern    int dosource();
  733.  
  734. --- 54,60 -----
  735.   extern    int dopopd();
  736.   extern    int dopushd();
  737.   extern    int dorepeat();
  738. + extern    int dosched();
  739.   extern    int doset();
  740.   extern    int dosetenv();
  741.   extern    int dosource();
  742. ***************
  743. *** 58,63
  744.   extern    int doswbrk();
  745.   extern    int doswitch();
  746.   extern    int dotime();
  747.   extern    int dounlimit();
  748.   extern    int doumask();
  749.   extern    int dowait();
  750.  
  751. --- 63,69 -----
  752.   extern    int doswbrk();
  753.   extern    int doswitch();
  754.   extern    int dotime();
  755. + #ifndef OREO
  756.   extern    int dounlimit();
  757.   #endif
  758.   extern    int doumask();
  759. ***************
  760. *** 59,64
  761.   extern    int doswitch();
  762.   extern    int dotime();
  763.   extern    int dounlimit();
  764.   extern    int doumask();
  765.   extern    int dowait();
  766.   extern    int dowhile();
  767.  
  768. --- 65,71 -----
  769.   extern    int dotime();
  770.   #ifndef OREO
  771.   extern    int dounlimit();
  772. + #endif
  773.   extern    int doumask();
  774.   extern    int dowait();
  775.   extern    int dowhile();
  776. ***************
  777. *** 74,79
  778.   extern    int dounhash();
  779.   extern    int unset();
  780.   extern    int dounsetenv();
  781.   
  782.   #define    INF    1000
  783.   
  784.  
  785. --- 81,87 -----
  786.   extern    int dounhash();
  787.   extern    int unset();
  788.   extern    int dounsetenv();
  789. + extern    int dolist();        /* for ls-F */
  790.   
  791.   #define    INF    1000
  792.   
  793. ***************
  794. *** 86,91
  795.       "alias",    doalias,    0,    INF,
  796.       "alloc",    showall,    0,    1,
  797.       "bg",        dobg,        0,    INF,
  798.       "break",    dobreak,    0,    0,
  799.       "breaksw",    doswbrk,    0,    0,
  800.   #ifdef IIASA
  801.  
  802. --- 94,100 -----
  803.       "alias",    doalias,    0,    INF,
  804.       "alloc",    showall,    0,    1,
  805.       "bg",        dobg,        0,    INF,
  806. +     "bind",        dobind,        0,    2,
  807.       "break",    dobreak,    0,    0,
  808.       "breaksw",    doswbrk,    0,    0,
  809.   #ifdef IIASA
  810. ***************
  811. *** 119,124
  812.       "if",        doif,        1,    INF,
  813.       "jobs",        dojobs,        0,    1,
  814.       "kill",        dokill,        1,    INF,
  815.       "limit",    dolimit,    0,    3,
  816.       "login",    dologin,    0,    1,
  817.       "logout",    dologout,    0,    0,
  818.  
  819. --- 128,134 -----
  820.       "if",        doif,        1,    INF,
  821.       "jobs",        dojobs,        0,    1,
  822.       "kill",        dokill,        1,    INF,
  823. + #ifndef OREO
  824.       "limit",    dolimit,    0,    3,
  825.   #endif OREO
  826.       "linedit",    doecho,        0,    INF,
  827. ***************
  828. *** 120,125
  829.       "jobs",        dojobs,        0,    1,
  830.       "kill",        dokill,        1,    INF,
  831.       "limit",    dolimit,    0,    3,
  832.       "login",    dologin,    0,    1,
  833.       "logout",    dologout,    0,    0,
  834.   #ifdef NEWGRP
  835.  
  836. --- 130,138 -----
  837.       "kill",        dokill,        1,    INF,
  838.   #ifndef OREO
  839.       "limit",    dolimit,    0,    3,
  840. + #endif OREO
  841. +     "linedit",    doecho,        0,    INF,
  842. +     "log",        dolog,        0,    0,
  843.       "login",    dologin,    0,    1,
  844.       "logout",    dologout,    0,    0,
  845.       "ls-F",        dolist,        0,    INF,
  846. ***************
  847. *** 122,127
  848.       "limit",    dolimit,    0,    3,
  849.       "login",    dologin,    0,    1,
  850.       "logout",    dologout,    0,    0,
  851.   #ifdef NEWGRP
  852.       "newgrp",    donewgrp,    1,    1,
  853.   #endif
  854.  
  855. --- 135,141 -----
  856.       "log",        dolog,        0,    0,
  857.       "login",    dologin,    0,    1,
  858.       "logout",    dologout,    0,    0,
  859. +     "ls-F",        dolist,        0,    INF,
  860.   #ifdef NEWGRP
  861.       "newgrp",    donewgrp,    1,    1,
  862.   #endif
  863. ***************
  864. *** 136,141
  865.   #endif
  866.       "rehash",    dohash,        0,    0,
  867.       "repeat",    dorepeat,    2,    INF,
  868.       "set",        doset,        0,    INF,
  869.       "setenv",    dosetenv,    0,    2,
  870.       "shift",    shift,        0,    1,
  871.  
  872. --- 150,156 -----
  873.   #endif
  874.       "rehash",    dohash,        0,    0,
  875.       "repeat",    dorepeat,    2,    INF,
  876. +     "sched",    dosched,    0,    INF,
  877.       "set",        doset,        0,    INF,
  878.       "setenv",    dosetenv,    0,    2,
  879.       "shift",    shift,        0,    1,
  880. ***************
  881. *** 147,152
  882.       "umask",    doumask,    0,    1,
  883.       "unalias",    unalias,    1,    INF,
  884.       "unhash",    dounhash,    0,    0,
  885.       "unlimit",    dounlimit,    0,    INF,
  886.       "unset",    unset,        1,    INF,
  887.       "unsetenv",    dounsetenv,    1,    INF,
  888.  
  889. --- 162,168 -----
  890.       "umask",    doumask,    0,    1,
  891.       "unalias",    unalias,    1,    INF,
  892.       "unhash",    dounhash,    0,    0,
  893. + #ifndef OREO
  894.       "unlimit",    dounlimit,    0,    INF,
  895.   #endif
  896.       "unset",    unset,        1,    INF,
  897. ***************
  898. *** 148,153
  899.       "unalias",    unalias,    1,    INF,
  900.       "unhash",    dounhash,    0,    0,
  901.       "unlimit",    dounlimit,    0,    INF,
  902.       "unset",    unset,        1,    INF,
  903.       "unsetenv",    dounsetenv,    1,    INF,
  904.       "wait",        dowait,        0,    0,
  905.  
  906. --- 164,170 -----
  907.       "unhash",    dounhash,    0,    0,
  908.   #ifndef OREO
  909.       "unlimit",    dounlimit,    0,    INF,
  910. + #endif
  911.       "unset",    unset,        1,    INF,
  912.       "unsetenv",    dounsetenv,    1,    INF,
  913.       "wait",        dowait,        0,    0,
  914. ***************
  915. *** 219,224
  916.       "PIPE",    "Broken pipe",
  917.       "ALRM",    "Alarm clock",
  918.       "TERM",    "Terminated",
  919.       "URG",    "Urgent I/O condition",
  920.       "STOP",    "Stopped (signal)",
  921.       "TSTP",    "Stopped",
  922.  
  923. --- 236,243 -----
  924.       "PIPE",    "Broken pipe",
  925.       "ALRM",    "Alarm clock",
  926.       "TERM",    "Terminated",
  927. + #ifdef SVID
  928. + # ifdef pyr            /* these are really the BSD sigs, plus a few */
  929.       "URG",    "Urgent I/O condition",
  930.       "STOP",    "Stopped (signal)",
  931.       "TSTP",    "Stopped",
  932. ***************
  933. *** 226,232
  934.       "CHLD",    "Child exited",
  935.       "TTIN", "Stopped (tty input)",
  936.       "TTOU", "Stopped (tty output)",
  937. !     "IO",    "I/O possible",
  938.       "XCPU",    "Cputime limit exceeded",
  939.       "XFSZ", "Filesize limit exceeded",
  940.       "VTALRM","Virtual timer expired",
  941.  
  942. --- 245,251 -----
  943.       "CHLD",    "Child exited",
  944.       "TTIN", "Stopped (tty input)",
  945.       "TTOU", "Stopped (tty output)",
  946. !     "IO",   "I/O possible",
  947.       "XCPU",    "Cputime limit exceeded",
  948.       "XFSZ", "Filesize limit exceeded",
  949.       "VTALRM", "Virtual time alarm",
  950. ***************
  951. *** 229,237
  952.       "IO",    "I/O possible",
  953.       "XCPU",    "Cputime limit exceeded",
  954.       "XFSZ", "Filesize limit exceeded",
  955. !     "VTALRM","Virtual timer expired",
  956. !     "PROF",    "Profiling timer expired",
  957. !     "WINCH","Window size changed",
  958.       0,    "Signal 29",
  959.       "USR1",    "User defined signal 1",
  960.       "USR2",    "User defined signal 2",
  961.  
  962. --- 248,286 -----
  963.       "IO",   "I/O possible",
  964.       "XCPU",    "Cputime limit exceeded",
  965.       "XFSZ", "Filesize limit exceeded",
  966. !     "VTALRM", "Virtual time alarm",
  967. !     "PROF",    "Profiling time alarm",
  968. !     "USR1",    "User signal 1",
  969. !     "USR2",    "User signal 2",
  970. !     "PWR",    "Power failure",
  971. !     0,    "Signal 31",
  972. !     0,    "Signal 32"
  973. ! # else pyr            /* the first four real SVID sigs. */
  974. !     "USR1",    "User signal 1",
  975. !     "USR2", "User signal 2",
  976. !     "CHLD",    "Child exited",
  977. !     "PWR",  "Power failure",
  978. ! #  ifdef OREO
  979. !     "TSTP",    "Stopped",
  980. !     "TTIN", "Stopped (tty input)",
  981. !     "TTOU", "Stopped (tty output)",
  982. !     "STOP",    "Stopped (signal)",
  983. !     "XCPU",    "Cputime limit exceeded",
  984. !     "XFSZ", "Filesize limit exceeded",
  985. !     "VTALRM", "Virtual time alarm",
  986. !     "PROF", "Profiling time alarm",
  987. !     "WINCH", "Window size changed",
  988. !     "CONT",    "Continued",
  989. ! #  else OREO
  990. !     0,    "Signal 20",
  991. !     0,    "Signal 21",
  992. !     0,    "Signal 22",
  993. !     0,    "Signal 23",
  994. !     0,    "Signal 24",
  995. !     0,    "Signal 25",
  996. !     0,    "Signal 26",
  997. !     0,    "Signal 27",
  998. !     0,    "Signal 28",
  999.       0,    "Signal 29",
  1000.   #  endif OREO
  1001.       0,    "Signal 30",
  1002. ***************
  1003. *** 233,238
  1004.       "PROF",    "Profiling timer expired",
  1005.       "WINCH","Window size changed",
  1006.       0,    "Signal 29",
  1007.       "USR1",    "User defined signal 1",
  1008.       "USR2",    "User defined signal 2",
  1009.       0,    "Signal 32"
  1010.  
  1011. --- 282,321 -----
  1012.       0,    "Signal 27",
  1013.       0,    "Signal 28",
  1014.       0,    "Signal 29",
  1015. + #  endif OREO
  1016. +     0,    "Signal 30",
  1017. +     0,    "Signal 31",
  1018. +     0,    "Signal 32"
  1019. + # endif pyr
  1020. + #else SVID
  1021. +     "URG",    "Urgent I/O condition",
  1022. +     "STOP",    "Stopped (signal)",
  1023. +     "TSTP",    "Stopped",
  1024. +     "CONT",    "Continued",
  1025. +     "CHLD",    "Child exited",
  1026. +     "TTIN", "Stopped (tty input)",
  1027. +     "TTOU", "Stopped (tty output)",
  1028. +     "IO",   "I/O possible",
  1029. +     "XCPU",    "Cputime limit exceeded",
  1030. +     "XFSZ", "Filesize limit exceeded",
  1031. +     "VTALRM", "Virtual time alarm",
  1032. +     "PROF",    "Profiling time alarm",
  1033. + # ifdef sun
  1034. +     "WINCH", "Window size changed",
  1035. +     "LOST",    "Resource lost",
  1036. +     "USR1",    "User signal 1",
  1037. +     "USR2",    "User signal 2",
  1038. +     0,    "Signal 32"
  1039. + # else sun
  1040. + #  ifdef pyr
  1041. +     "USR1",    "User signal 1",
  1042. +     "USR2",    "User signal 2",
  1043. +     "PWR",    "Power failure",
  1044. +     0,    "Signal 31",
  1045. +     0,    "Signal 32"
  1046. + #  else pyr
  1047. +     "WINCH", "Window size changed",
  1048. +     0,    "Signal 29",
  1049.       "USR1",    "User defined signal 1",
  1050.       "USR2",    "User defined signal 2",
  1051.       0,    "Signal 32"
  1052. ***************
  1053. *** 236,239
  1054.       "USR1",    "User defined signal 1",
  1055.       "USR2",    "User defined signal 2",
  1056.       0,    "Signal 32"
  1057.   };
  1058.  
  1059. --- 319,325 -----
  1060.       "USR1",    "User defined signal 1",
  1061.       "USR2",    "User defined signal 2",
  1062.       0,    "Signal 32"
  1063. + #  endif pyr
  1064. + # endif sun
  1065. + #endif SVID
  1066.   };
  1067. *** sh.lex.c    Sat Mar 29 07:38:02 1986
  1068. --- /usr/src/local/tcsh/sh.lex.c    Thu Sep 17 23:23:42 1987
  1069. ***************
  1070. *** 9,15
  1071.   #endif
  1072.   
  1073.   #include "sh.h"
  1074. - #include <sgtty.h>
  1075.   
  1076.   /*
  1077.    * C shell
  1078.  
  1079. --- 9,14 -----
  1080.   #endif
  1081.   
  1082.   #include "sh.h"
  1083.   
  1084.   /*
  1085.    * C shell
  1086. ***************
  1087. *** 221,234
  1088.                       c |= QUOTE;
  1089.                   else {
  1090.                       if (c == '\n')
  1091. !                         /*
  1092. !                         if (c1 == '`')
  1093. !                             c = ' ';
  1094. !                         else
  1095. !                         */
  1096. !                             c |= QUOTE;
  1097. !                     ungetC(c);
  1098. !                     c = '\\';
  1099.                   }
  1100.               } else if (c == '\n') {
  1101.                   seterrc("Unmatched ", c1);
  1102.  
  1103. --- 220,234 -----
  1104.                       c |= QUOTE;
  1105.                   else {
  1106.                       if (c == '\n')
  1107. !                         c |= QUOTE;
  1108. !                     else if (c == '"')
  1109. !                         c |= QUOTE;
  1110. !                     else if (c == '\'')
  1111. !                         c |= QUOTE;
  1112. !                     else {
  1113. !                         ungetC(c);
  1114. !                         c = '\\';
  1115. !                     }
  1116.                   }
  1117.               } else if (c == '\n') {
  1118.                   seterrc("Unmatched ", c1);
  1119. ***************
  1120. *** 1126,1131
  1121.   reread:
  1122.           c = bgetc();
  1123.           if (c < 0) {
  1124.               struct sgttyb tty;
  1125.   
  1126.               if (wanteof)
  1127.  
  1128. --- 1126,1135 -----
  1129.   reread:
  1130.           c = bgetc();
  1131.           if (c < 0) {
  1132. + #ifdef    SVID
  1133. + #include <termio.h>
  1134. +             struct termio tty;
  1135. + #else
  1136.               struct sgttyb tty;
  1137.   #endif SVID
  1138.   
  1139. ***************
  1140. *** 1127,1132
  1141.           c = bgetc();
  1142.           if (c < 0) {
  1143.               struct sgttyb tty;
  1144.   
  1145.               if (wanteof)
  1146.                   return (-1);
  1147.  
  1148. --- 1131,1137 -----
  1149.               struct termio tty;
  1150.   #else
  1151.               struct sgttyb tty;
  1152. + #endif SVID
  1153.   
  1154.               if (wanteof)
  1155.                   return (-1);
  1156. ***************
  1157. *** 1131,1136
  1158.               if (wanteof)
  1159.                   return (-1);
  1160.               /* was isatty but raw with ignoreeof yields problems */
  1161.               if (ioctl(SHIN, TIOCGETP, (char *)&tty) == 0 &&
  1162.                   (tty.sg_flags & RAW) == 0) {
  1163.                   /* was 'short' for FILEC */
  1164.  
  1165. --- 1136,1145 -----
  1166.               if (wanteof)
  1167.                   return (-1);
  1168.               /* was isatty but raw with ignoreeof yields problems */
  1169. + #ifdef SVID
  1170. +             if (ioctl(SHIN, TCGETA, &tty)==0 &&
  1171. +                 (tty.c_cc[VEOF] != CEOF)) {
  1172. + #else SVID
  1173.               if (ioctl(SHIN, TIOCGETP, (char *)&tty) == 0 &&
  1174.                   (tty.sg_flags & RAW) == 0) {
  1175.   #endif
  1176. ***************
  1177. *** 1133,1139
  1178.               /* was isatty but raw with ignoreeof yields problems */
  1179.               if (ioctl(SHIN, TIOCGETP, (char *)&tty) == 0 &&
  1180.                   (tty.sg_flags & RAW) == 0) {
  1181. !                 /* was 'short' for FILEC */
  1182.                   int ctpgrp;
  1183.   
  1184.                   if (++sincereal > 25)
  1185.  
  1186. --- 1142,1148 -----
  1187.   #else SVID
  1188.               if (ioctl(SHIN, TIOCGETP, (char *)&tty) == 0 &&
  1189.                   (tty.sg_flags & RAW) == 0) {
  1190. ! #endif
  1191.                   int ctpgrp;
  1192.   
  1193.                   if (++sincereal > 25)
  1194. ***************
  1195. *** 1138,1143
  1196.   
  1197.                   if (++sincereal > 25)
  1198.                       goto oops;
  1199.                   if (tpgrp != -1 &&
  1200.                       ioctl(FSHTTY, TIOCGPGRP, (char *)&ctpgrp) == 0 &&
  1201.                       tpgrp != ctpgrp) {
  1202.  
  1203. --- 1147,1153 -----
  1204.   
  1205.                   if (++sincereal > 25)
  1206.                       goto oops;
  1207. + #ifdef BSDJOBS
  1208.                   if (tpgrp != -1 &&
  1209.                       ioctl(FSHTTY, TIOCGPGRP, (char *)&ctpgrp) == 0 &&
  1210.                       tpgrp != ctpgrp) {
  1211. ***************
  1212. *** 1147,1152
  1213.   printf("Reset tty pgrp from %d to %d\n", ctpgrp, tpgrp);
  1214.                       goto reread;
  1215.                   }
  1216.                   if (adrof("ignoreeof")) {
  1217.                       if (loginsh)
  1218.                           printf("\nUse \"logout\" to logout.\n");
  1219.  
  1220. --- 1157,1163 -----
  1221.   printf("Reset tty pgrp from %d to %d\n", ctpgrp, tpgrp);
  1222.                       goto reread;
  1223.                   }
  1224. + #endif BSDJOBS
  1225.                   if (adrof("ignoreeof")) {
  1226.                       if (loginsh)
  1227.                           printf("\nUse \"logout\" to logout.\n");
  1228. ***************
  1229. *** 1151,1157
  1230.                       if (loginsh)
  1231.                           printf("\nUse \"logout\" to logout.\n");
  1232.                       else
  1233. !                         printf("\nUse \"exit\" to leave csh.\n");
  1234.                       reset();
  1235.                   }
  1236.                   if (chkstop == 0)
  1237.  
  1238. --- 1162,1168 -----
  1239.                       if (loginsh)
  1240.                           printf("\nUse \"logout\" to logout.\n");
  1241.                       else
  1242. !                         printf("\nUse \"exit\" to leave tcsh.\n");
  1243.                       reset();
  1244.                   }
  1245.                   if (chkstop == 0)
  1246. ***************
  1247. *** 1171,1178
  1248.   bgetc()
  1249.   {
  1250.       register int buf, off, c;
  1251. ! #ifdef FILEC
  1252. !     char ttyline[BUFSIZ];
  1253.       register int numleft = 0, roomleft;
  1254.   #endif
  1255.   
  1256.  
  1257. --- 1182,1188 -----
  1258.   bgetc()
  1259.   {
  1260.       register int buf, off, c;
  1261. !     extern char InputBuf[];
  1262.       register int numleft = 0, roomleft;
  1263.   
  1264.   #ifdef TELL
  1265. ***************
  1266. *** 1174,1180
  1267.   #ifdef FILEC
  1268.       char ttyline[BUFSIZ];
  1269.       register int numleft = 0, roomleft;
  1270. - #endif
  1271.   
  1272.   #ifdef TELL
  1273.       if (cantell) {
  1274.  
  1275. --- 1184,1189 -----
  1276.       register int buf, off, c;
  1277.       extern char InputBuf[];
  1278.       register int numleft = 0, roomleft;
  1279.   
  1280.   #ifdef TELL
  1281.       if (cantell) {
  1282. ***************
  1283. *** 1187,1193
  1284.               do
  1285.                   c = read(SHIN, fbuf[0], BUFSIZ);
  1286.               while (c < 0 && errno == EINTR);
  1287. !             if (c <= 0)
  1288.                   return (-1);
  1289.               feobp += c;
  1290.           }
  1291.  
  1292. --- 1196,1202 -----
  1293.               do
  1294.                   c = read(SHIN, fbuf[0], BUFSIZ);
  1295.               while (c < 0 && errno == EINTR);
  1296. !             if (c <= 0) {
  1297.                   return (-1);
  1298.               }
  1299.               feobp += c;
  1300. ***************
  1301. *** 1189,1194
  1302.               while (c < 0 && errno == EINTR);
  1303.               if (c <= 0)
  1304.                   return (-1);
  1305.               feobp += c;
  1306.           }
  1307.           c = fbuf[0][fseekp - fbobp];
  1308.  
  1309. --- 1198,1204 -----
  1310.               while (c < 0 && errno == EINTR);
  1311.               if (c <= 0) {
  1312.                   return (-1);
  1313. +             }
  1314.               feobp += c;
  1315.           }
  1316.           c = fbuf[0][fseekp - fbobp];
  1317. ***************
  1318. *** 1210,1216
  1319.           fbuf = nfbuf;
  1320.           fbuf[fblocks] = calloc(BUFSIZ, sizeof (char));
  1321.           fblocks++;
  1322. !         goto again;
  1323.       }
  1324.       if (fseekp >= feobp) {
  1325.           buf = (int) feobp / BUFSIZ;
  1326.  
  1327. --- 1220,1227 -----
  1328.           fbuf = nfbuf;
  1329.           fbuf[fblocks] = calloc(BUFSIZ, sizeof (char));
  1330.           fblocks++;
  1331. !         if (!intty)
  1332. !             goto again;
  1333.       }
  1334.       if (fseekp >= feobp) {
  1335.           buf = (int) feobp / BUFSIZ;
  1336. ***************
  1337. *** 1215,1221
  1338.       if (fseekp >= feobp) {
  1339.           buf = (int) feobp / BUFSIZ;
  1340.           off = (int) feobp % BUFSIZ;
  1341. ! #ifndef FILEC
  1342.           for (;;) {
  1343.               c = read(SHIN, fbuf[buf] + off, BUFSIZ - off);
  1344.   #else
  1345.  
  1346. --- 1226,1232 -----
  1347.       if (fseekp >= feobp) {
  1348.           buf = (int) feobp / BUFSIZ;
  1349.           off = (int) feobp % BUFSIZ;
  1350. !          roomleft = BUFSIZ - off;
  1351.           for (;;) {
  1352.               if (intty) {     /* then use twenex routine */
  1353.                   /* PWP: get a line */
  1354. ***************
  1355. *** 1217,1234
  1356.           off = (int) feobp % BUFSIZ;
  1357.   #ifndef FILEC
  1358.           for (;;) {
  1359. !             c = read(SHIN, fbuf[buf] + off, BUFSIZ - off);
  1360. ! #else
  1361. !         roomleft = BUFSIZ - off;
  1362. !         for (;;) {
  1363. !             if (filec && intty) {
  1364. !                 c = numleft ? numleft : tenex(ttyline, BUFSIZ);
  1365. !                 if (c > roomleft) {
  1366. !                     /* start with fresh buffer */
  1367. !                     feobp = fseekp = fblocks * BUFSIZ;
  1368. !                     numleft = c;
  1369. !                     goto again;
  1370. !                 }
  1371.                   if (c > 0)
  1372.                       copy(fbuf[buf] + off, ttyline, c);
  1373.                   numleft = 0;
  1374.  
  1375. --- 1228,1244 -----
  1376.           off = (int) feobp % BUFSIZ;
  1377.            roomleft = BUFSIZ - off;
  1378.           for (;;) {
  1379. !             if (intty) {     /* then use twenex routine */
  1380. !                 /* PWP: get a line */
  1381. !                 c = numleft ? numleft : Inputl();
  1382. !                 if (c > roomleft) /* No room in this buffer? */
  1383. !                     {
  1384. !                         /* start with fresh buffer */
  1385. !                         feobp = fseekp =
  1386. !                             fblocks * BUFSIZ;
  1387. !                         numleft = c;
  1388. !                         goto again;
  1389. !                     }
  1390.                   if (c > 0)
  1391.                       copy (fbuf[buf] + off, InputBuf, c);
  1392.                   /* copy (fbuf[buf] + off, ttyline, c); */
  1393. ***************
  1394. *** 1230,1236
  1395.                       goto again;
  1396.                   }
  1397.                   if (c > 0)
  1398. !                     copy(fbuf[buf] + off, ttyline, c);
  1399.                   numleft = 0;
  1400.               } else
  1401.                   c = read(SHIN, fbuf[buf] + off, roomleft);
  1402.  
  1403. --- 1240,1247 -----
  1404.                           goto again;
  1405.                       }
  1406.                   if (c > 0)
  1407. !                     copy (fbuf[buf] + off, InputBuf, c);
  1408. !                 /* copy (fbuf[buf] + off, ttyline, c); */
  1409.                   numleft = 0;
  1410.               }
  1411.               else {
  1412. ***************
  1413. *** 1232,1238
  1414.                   if (c > 0)
  1415.                       copy(fbuf[buf] + off, ttyline, c);
  1416.                   numleft = 0;
  1417. !             } else
  1418.                   c = read(SHIN, fbuf[buf] + off, roomleft);
  1419.   #endif
  1420.               if (c >= 0)
  1421.  
  1422. --- 1243,1250 -----
  1423.                       copy (fbuf[buf] + off, InputBuf, c);
  1424.                   /* copy (fbuf[buf] + off, ttyline, c); */
  1425.                   numleft = 0;
  1426. !             }
  1427. !             else {
  1428.                   c = read(SHIN, fbuf[buf] + off, roomleft);
  1429.               }
  1430.               if (c >= 0)
  1431. ***************
  1432. *** 1234,1240
  1433.                   numleft = 0;
  1434.               } else
  1435.                   c = read(SHIN, fbuf[buf] + off, roomleft);
  1436. ! #endif
  1437.               if (c >= 0)
  1438.                   break;
  1439.               if (errno == EWOULDBLOCK) {
  1440.  
  1441. --- 1246,1252 -----
  1442.               }
  1443.               else {
  1444.                   c = read(SHIN, fbuf[buf] + off, roomleft);
  1445. !             }
  1446.               if (c >= 0)
  1447.                   break;
  1448.               if (errno == EWOULDBLOCK) {
  1449. ***************
  1450. *** 1239,1245
  1451.                   break;
  1452.               if (errno == EWOULDBLOCK) {
  1453.                   int off = 0;
  1454. ! 
  1455.                   (void) ioctl(SHIN, FIONBIO, (char *)&off);
  1456.               } else if (errno != EINTR)
  1457.                   break;
  1458.  
  1459. --- 1251,1257 -----
  1460.                   break;
  1461.               if (errno == EWOULDBLOCK) {
  1462.                   int off = 0;
  1463. !                 
  1464.                   (void) ioctl(SHIN, FIONBIO, (char *)&off);
  1465.               } else if (errno != EINTR)
  1466.                   break;
  1467. ***************
  1468. *** 1244,1250
  1469.               } else if (errno != EINTR)
  1470.                   break;
  1471.           }
  1472. !         if (c <= 0)
  1473.               return (-1);
  1474.           feobp += c;
  1475.   #ifndef FILEC
  1476.  
  1477. --- 1256,1262 -----
  1478.               } else if (errno != EINTR)
  1479.                   break;
  1480.           }
  1481. !         if (c <= 0) {
  1482.               return (-1);
  1483.           }
  1484.           feobp += c;
  1485. ***************
  1486. *** 1246,1251
  1487.           }
  1488.           if (c <= 0)
  1489.               return (-1);
  1490.           feobp += c;
  1491.   #ifndef FILEC
  1492.           goto again;
  1493.  
  1494. --- 1258,1264 -----
  1495.           }
  1496.           if (c <= 0) {
  1497.               return (-1);
  1498. +         }
  1499.           feobp += c;
  1500.           if (!intty)
  1501.               goto again;
  1502. ***************
  1503. *** 1247,1256
  1504.           if (c <= 0)
  1505.               return (-1);
  1506.           feobp += c;
  1507. ! #ifndef FILEC
  1508. !         goto again;
  1509. ! #else
  1510. !         if (filec && !intty)
  1511.               goto again;
  1512.   #endif
  1513.       }
  1514.  
  1515. --- 1260,1266 -----
  1516.               return (-1);
  1517.           }
  1518.           feobp += c;
  1519. !         if (!intty)
  1520.               goto again;
  1521.       }
  1522.       c = fbuf[buf][(int) fseekp % BUFSIZ];
  1523. ***************
  1524. *** 1252,1258
  1525.   #else
  1526.           if (filec && !intty)
  1527.               goto again;
  1528. - #endif
  1529.       }
  1530.       c = fbuf[buf][(int) fseekp % BUFSIZ];
  1531.       fseekp++;
  1532.  
  1533. --- 1262,1267 -----
  1534.           feobp += c;
  1535.           if (!intty)
  1536.               goto again;
  1537.       }
  1538.       c = fbuf[buf][(int) fseekp % BUFSIZ];
  1539.       fseekp++;
  1540. *** sh.local.h    Thu Jun  6 13:15:34 1985
  1541. --- /usr/src/local/tcsh/sh.local.h    Mon Aug 17 21:32:31 1987
  1542. ***************
  1543. *** 22,28
  1544.    */
  1545.   
  1546.   #define    BUFSIZ    1024        /* default buffer size */
  1547. ! #define    SHELLPATH    "/bin/csh"
  1548.   #define    OTHERSH        "/bin/sh"
  1549.   #define FORKSLEEP    10    /* delay loop on non-interactive fork failure */
  1550.   #define    MAILINTVL    600    /* 10 minutes */
  1551.  
  1552. --- 22,30 -----
  1553.    */
  1554.   
  1555.   #define    BUFSIZ    1024        /* default buffer size */
  1556. ! #ifndef SHELLPATH
  1557. ! #define    SHELLPATH    "/bin/tcsh"
  1558. ! #endif
  1559.   #define    OTHERSH        "/bin/sh"
  1560.   #define FORKSLEEP    10    /* delay loop on non-interactive fork failure */
  1561.   #define    MAILINTVL    600    /* 10 minutes */
  1562. *** sh.misc.c    Sat Mar 29 07:37:28 1986
  1563. --- /usr/src/local/tcsh/sh.misc.c    Mon Aug 17 21:32:32 1987
  1564. ***************
  1565. *** 88,94
  1566.   #else
  1567.       showall(av);
  1568.       printf("i=%d: Out of memory\n", i);
  1569. !     chdir("/usr/bill/cshcore");
  1570.       abort();
  1571.   #endif
  1572.       return 0;        /* fool lint */
  1573.  
  1574. --- 88,94 -----
  1575.   #else
  1576.       showall(av);
  1577.       printf("i=%d: Out of memory\n", i);
  1578. !     /* chdir("/usr/bill/cshcore"); */
  1579.       abort();
  1580.   #endif
  1581.       return 0;        /* fool lint */
  1582. *** sh.print.c    Thu Jun  6 13:15:28 1985
  1583. --- /usr/src/local/tcsh/sh.print.c    Mon Aug 17 21:44:36 1987
  1584. ***************
  1585. *** 42,48
  1586.       printf("%d%d", i / 10, i % 10);
  1587.   }
  1588.   
  1589. ! char    linbuf[128];
  1590.   char    *linp = linbuf;
  1591.   
  1592.   putchar(c)
  1593.  
  1594. --- 42,48 -----
  1595.       printf("%d%d", i / 10, i % 10);
  1596.   }
  1597.   
  1598. ! char    linbuf[2048];        /* was 128 */
  1599.   char    *linp = linbuf;
  1600.   int lbuffed = 1;        /* true if line buffered */
  1601.   
  1602. ***************
  1603. *** 44,49
  1604.   
  1605.   char    linbuf[128];
  1606.   char    *linp = linbuf;
  1607.   
  1608.   putchar(c)
  1609.       register int c;
  1610.  
  1611. --- 44,50 -----
  1612.   
  1613.   char    linbuf[2048];        /* was 128 */
  1614.   char    *linp = linbuf;
  1615. + int lbuffed = 1;        /* true if line buffered */
  1616.   
  1617.   putchar(c)
  1618.       register int c;
  1619. ***************
  1620. *** 49,55
  1621.       register int c;
  1622.   {
  1623.   
  1624. !     if ((c & QUOTE) == 0 && (c == 0177 || c < ' ' && c != '\t' && c != '\n')) {
  1625.           putchar('^');
  1626.           if (c == 0177)
  1627.               c = '?';
  1628.  
  1629. --- 50,56 -----
  1630.       register int c;
  1631.   {
  1632.   
  1633. !     if ((c & QUOTE) == 0 && (c == 0177 || c < ' ' && c != '\t' && c != '\n' && c != '\r')) {
  1634.           putchar('^');
  1635.           if (c == 0177)
  1636.               c = '?';
  1637. ***************
  1638. *** 58,64
  1639.       }
  1640.       c &= TRIM;
  1641.       *linp++ = c;
  1642. !     if (c == '\n' || linp >= &linbuf[sizeof linbuf - 2])
  1643.           flush();
  1644.   }
  1645.   
  1646.  
  1647. --- 59,65 -----
  1648.       }
  1649.       c &= TRIM;
  1650.       *linp++ = c;
  1651. !     if ((lbuffed && c == '\n') || linp >= &linbuf[sizeof linbuf - 2])
  1652.           flush();
  1653.   }
  1654.   
  1655. ***************
  1656. *** 62,67
  1657.           flush();
  1658.   }
  1659.   
  1660.   draino()
  1661.   {
  1662.   
  1663.  
  1664. --- 63,77 -----
  1665.           flush();
  1666.   }
  1667.   
  1668. + putraw(c)
  1669. +     register int c;
  1670. + {
  1671. +     c &= TRIM;
  1672. +     *linp++ = c;
  1673. +     if (linp >= &linbuf[sizeof linbuf - 2])
  1674. +         flush();
  1675. + }
  1676. + 
  1677.   draino()
  1678.   {
  1679.   
  1680. ***************
  1681. *** 87,92
  1682.           (void) write(unit, "\n", 1);
  1683.       }
  1684.   #endif
  1685. !     (void) write(unit, linbuf, linp - linbuf);
  1686.       linp = linbuf;
  1687.   }
  1688.  
  1689. --- 97,102 -----
  1690.           (void) write(unit, "\n", 1);
  1691.       }
  1692.   #endif
  1693. !     (void) write(unit, linbuf, (int) (linp - linbuf));
  1694.       linp = linbuf;
  1695.   }
  1696. *** sh.proc.c    Tue May 13 01:12:46 1986
  1697. --- /usr/src/local/tcsh/sh.proc.c    Mon Aug 17 21:32:39 1987
  1698. ***************
  1699. *** 34,39
  1700.       register int pid;
  1701.       union wait w;
  1702.       int jobflags;
  1703.       struct rusage ru;
  1704.   
  1705.   loop:
  1706.  
  1707. --- 34,40 -----
  1708.       register int pid;
  1709.       union wait w;
  1710.       int jobflags;
  1711. + #ifndef OREO
  1712.       struct rusage ru;
  1713.   #endif
  1714.   
  1715. ***************
  1716. *** 35,40
  1717.       union wait w;
  1718.       int jobflags;
  1719.       struct rusage ru;
  1720.   
  1721.   loop:
  1722.       pid = wait3(&w, (setintr ? WNOHANG|WUNTRACED:WNOHANG), &ru);
  1723.  
  1724. --- 36,42 -----
  1725.       int jobflags;
  1726.   #ifndef OREO
  1727.       struct rusage ru;
  1728. + #endif
  1729.   
  1730.   loop:
  1731.       pid = wait3(&w, (setintr ? WNOHANG|WUNTRACED:WNOHANG),
  1732. ***************
  1733. *** 37,43
  1734.       struct rusage ru;
  1735.   
  1736.   loop:
  1737. !     pid = wait3(&w, (setintr ? WNOHANG|WUNTRACED:WNOHANG), &ru);
  1738.       if (pid <= 0) {
  1739.           if (errno == EINTR) {
  1740.               errno = 0;
  1741.  
  1742. --- 39,50 -----
  1743.   #endif
  1744.   
  1745.   loop:
  1746. !     pid = wait3(&w, (setintr ? WNOHANG|WUNTRACED:WNOHANG),
  1747. ! #ifdef    OREO
  1748. !             0);
  1749. ! #else    OREO
  1750. !             &ru);
  1751. ! #endif    OREO
  1752.       if (pid <= 0) {
  1753.           if (errno == EINTR) {
  1754.               errno = 0;
  1755. ***************
  1756. *** 60,65
  1757.       } else {
  1758.           if (pp->p_flags & (PTIME|PPTIME) || adrof("time"))
  1759.               (void) gettimeofday(&pp->p_etime, (struct timezone *)0);
  1760.           pp->p_rusage = ru;
  1761.           if (WIFSIGNALED(w)) {
  1762.               if (w.w_termsig == SIGINT)
  1763.  
  1764. --- 67,73 -----
  1765.       } else {
  1766.           if (pp->p_flags & (PTIME|PPTIME) || adrof("time"))
  1767.               (void) gettimeofday(&pp->p_etime, (struct timezone *)0);
  1768. + #ifndef    OREO
  1769.           pp->p_rusage = ru;
  1770.   #endif OREO
  1771.           if (WIFSIGNALED(w)) {
  1772. ***************
  1773. *** 61,66
  1774.           if (pp->p_flags & (PTIME|PPTIME) || adrof("time"))
  1775.               (void) gettimeofday(&pp->p_etime, (struct timezone *)0);
  1776.           pp->p_rusage = ru;
  1777.           if (WIFSIGNALED(w)) {
  1778.               if (w.w_termsig == SIGINT)
  1779.                   pp->p_flags |= PINTERRUPTED;
  1780.  
  1781. --- 69,75 -----
  1782.               (void) gettimeofday(&pp->p_etime, (struct timezone *)0);
  1783.   #ifndef    OREO
  1784.           pp->p_rusage = ru;
  1785. + #endif OREO
  1786.           if (WIFSIGNALED(w)) {
  1787.               if (w.w_termsig == SIGINT)
  1788.                   pp->p_flags |= PINTERRUPTED;
  1789. ***************
  1790. *** 211,216
  1791.           sigpause(sigblock(0) &~ sigmask(SIGCHLD));
  1792.       }
  1793.       (void) sigsetmask(omask);
  1794.       if (tpgrp > 0)            /* get tty back */
  1795.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&tpgrp);
  1796.       if ((jobflags&(PSIGNALED|PSTOPPED|PTIME)) ||
  1797.  
  1798. --- 220,226 -----
  1799.           sigpause(sigblock(0) &~ sigmask(SIGCHLD));
  1800.       }
  1801.       (void) sigsetmask(omask);
  1802. + #ifdef    BSDJOBS
  1803.       if (tpgrp > 0)            /* get tty back */
  1804.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&tpgrp);
  1805.   #endif    BSDJOBS
  1806. ***************
  1807. *** 213,218
  1808.       (void) sigsetmask(omask);
  1809.       if (tpgrp > 0)            /* get tty back */
  1810.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&tpgrp);
  1811.       if ((jobflags&(PSIGNALED|PSTOPPED|PTIME)) ||
  1812.            !eq(dcwd->di_name, fp->p_cwd->di_name)) {
  1813.           if (jobflags&PSTOPPED)
  1814.  
  1815. --- 223,229 -----
  1816.   #ifdef    BSDJOBS
  1817.       if (tpgrp > 0)            /* get tty back */
  1818.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&tpgrp);
  1819. + #endif    BSDJOBS
  1820.       if ((jobflags&(PSIGNALED|PSTOPPED|PTIME)) ||
  1821.            !eq(dcwd->di_name, fp->p_cwd->di_name)) {
  1822.           if (jobflags&PSTOPPED)
  1823. ***************
  1824. *** 628,633
  1825.           if (pp->p_flags&PPTIME && !(status&(PSTOPPED|PRUNNING))) {
  1826.               if (linp != linbuf)
  1827.                   printf("\n\t");
  1828.               { static struct rusage zru;
  1829.                 prusage(&zru, &pp->p_rusage, &pp->p_etime,
  1830.                   &pp->p_btime);
  1831.  
  1832. --- 639,645 -----
  1833.           if (pp->p_flags&PPTIME && !(status&(PSTOPPED|PRUNNING))) {
  1834.               if (linp != linbuf)
  1835.                   printf("\n\t");
  1836. + #ifndef OREO
  1837.               { static struct rusage zru;
  1838.                 prusage(&zru, &pp->p_rusage, &pp->p_etime,
  1839.                   &pp->p_btime);
  1840. ***************
  1841. *** 632,637
  1842.                 prusage(&zru, &pp->p_rusage, &pp->p_etime,
  1843.                   &pp->p_btime);
  1844.               }
  1845.           }
  1846.           if (tp == pp->p_friends) {
  1847.               if (linp != linbuf)
  1848.  
  1849. --- 644,650 -----
  1850.                 prusage(&zru, &pp->p_rusage, &pp->p_etime,
  1851.                   &pp->p_btime);
  1852.               }
  1853. + #endif OREO
  1854.           }
  1855.           if (tp == pp->p_friends) {
  1856.               if (linp != linbuf)
  1857. ***************
  1858. *** 654,659
  1859.   ptprint(tp)
  1860.       register struct process *tp;
  1861.   {
  1862.       struct timeval tetime, diff;
  1863.       static struct timeval ztime;
  1864.       struct rusage ru;
  1865.  
  1866. --- 667,675 -----
  1867.   ptprint(tp)
  1868.       register struct process *tp;
  1869.   {
  1870. + #ifdef OREO
  1871. +     printf ("There is no time stuff for OREO yet (sorry).\n");
  1872. + #else OREO
  1873.       struct timeval tetime, diff;
  1874.       static struct timeval ztime;
  1875.       struct rusage ru;
  1876. ***************
  1877. *** 669,674
  1878.               tetime = diff;
  1879.       } while ((pp = pp->p_friends) != tp);
  1880.       prusage(&zru, &ru, &tetime, &ztime);
  1881.   }
  1882.   
  1883.   /*
  1884.  
  1885. --- 685,691 -----
  1886.               tetime = diff;
  1887.       } while ((pp = pp->p_friends) != tp);
  1888.       prusage(&zru, &ru, &tetime, &ztime);
  1889. + #endif OREO
  1890.   }
  1891.   
  1892.   /*
  1893. ***************
  1894. *** 896,901
  1895.       if (!foregnd)
  1896.           pclrcurr(pp);
  1897.       (void) pprint(pp, foregnd ? NAME|JOBDIR : NUMBER|NAME|AMPERSAND);
  1898.       if (foregnd)
  1899.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pp->p_jobid);
  1900.       if (jobflags&PSTOPPED)
  1901.  
  1902. --- 913,919 -----
  1903.       if (!foregnd)
  1904.           pclrcurr(pp);
  1905.       (void) pprint(pp, foregnd ? NAME|JOBDIR : NUMBER|NAME|AMPERSAND);
  1906. + #ifdef    BSDJOBS
  1907.       if (foregnd)
  1908.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pp->p_jobid);
  1909.       if (jobflags&PSTOPPED)
  1910. ***************
  1911. *** 900,905
  1912.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pp->p_jobid);
  1913.       if (jobflags&PSTOPPED)
  1914.           (void) killpg(pp->p_jobid, SIGCONT);
  1915.       (void) sigsetmask(omask);
  1916.   }
  1917.   
  1918.  
  1919. --- 918,924 -----
  1920.           (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pp->p_jobid);
  1921.       if (jobflags&PSTOPPED)
  1922.           (void) killpg(pp->p_jobid, SIGCONT);
  1923. + #endif    BSDJOBS
  1924.       (void) sigsetmask(omask);
  1925.   }
  1926.   
  1927. ***************
  1928. *** 1063,1068
  1929.               (void) signal(SIGINT, SIG_IGN);
  1930.               (void) signal(SIGQUIT, SIG_IGN);
  1931.           }
  1932.           if (wanttty > 0)
  1933.               (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pgrp);
  1934.           if (wanttty >= 0 && tpgrp >= 0)
  1935.  
  1936. --- 1082,1088 -----
  1937.               (void) signal(SIGINT, SIG_IGN);
  1938.               (void) signal(SIGQUIT, SIG_IGN);
  1939.           }
  1940. + #ifdef BSDJOBS
  1941.           if (wanttty > 0)
  1942.               (void) ioctl(FSHTTY, TIOCSPGRP, (char *)&pgrp);
  1943.           if (wanttty >= 0 && tpgrp >= 0)
  1944. ***************
  1945. *** 1069,1074
  1946.               (void) setpgrp(0, pgrp);
  1947.           if (tpgrp > 0)
  1948.               tpgrp = 0;        /* gave tty away */
  1949.           /*
  1950.            * Nohup and nice apply only to TCOM's but it would be
  1951.            * nice (?!?) if you could say "nohup (foo;bar)"
  1952.  
  1953. --- 1089,1095 -----
  1954.               (void) setpgrp(0, pgrp);
  1955.           if (tpgrp > 0)
  1956.               tpgrp = 0;        /* gave tty away */
  1957. + #endif BSDJOBS
  1958.           /*
  1959.            * Nohup and nice apply only to TCOM's but it would be
  1960.            * nice (?!?) if you could say "nohup (foo;bar)"
  1961. *** sh.proc.h    Thu Jun  6 13:15:49 1985
  1962. --- /usr/src/local/tcsh/sh.proc.h    Mon Aug 17 21:32:40 1987
  1963. ***************
  1964. *** 30,35
  1965.       /* if a job is stopped/background p_jobid gives its pgrp */
  1966.       struct    timeval p_btime;    /* begin time */
  1967.       struct    timeval p_etime;    /* end time */
  1968.       struct    rusage p_rusage;
  1969.       char    *p_command;        /* first PMAXLEN chars of command */
  1970.   };
  1971.  
  1972. --- 30,36 -----
  1973.       /* if a job is stopped/background p_jobid gives its pgrp */
  1974.       struct    timeval p_btime;    /* begin time */
  1975.       struct    timeval p_etime;    /* end time */
  1976. + #ifndef OREO
  1977.       struct    rusage p_rusage;
  1978.   #endif    OREO
  1979.       char    *p_command;        /* first PMAXLEN chars of command */
  1980. ***************
  1981. *** 31,36
  1982.       struct    timeval p_btime;    /* begin time */
  1983.       struct    timeval p_etime;    /* end time */
  1984.       struct    rusage p_rusage;
  1985.       char    *p_command;        /* first PMAXLEN chars of command */
  1986.   };
  1987.   
  1988.  
  1989. --- 32,38 -----
  1990.       struct    timeval p_etime;    /* end time */
  1991.   #ifndef OREO
  1992.       struct    rusage p_rusage;
  1993. + #endif    OREO
  1994.       char    *p_command;        /* first PMAXLEN chars of command */
  1995.   };
  1996.   
  1997. *** sh.sem.c    Tue May 13 01:08:43 1986
  1998. --- /usr/src/local/tcsh/sh.sem.c    Thu Sep 24 15:04:35 1987
  1999. ***************
  2000. *** 187,192
  2001.                       (void) signal(SIGINT, SIG_IGN);
  2002.                       (void) signal(SIGQUIT, SIG_IGN);
  2003.                   }
  2004.                   if (wanttty > 0)
  2005.                       (void) ioctl(FSHTTY, TIOCSPGRP,
  2006.                           (char *)&pgrp);
  2007.  
  2008. --- 187,193 -----
  2009.                       (void) signal(SIGINT, SIG_IGN);
  2010.                       (void) signal(SIGQUIT, SIG_IGN);
  2011.                   }
  2012. + #ifdef BSDJOBS
  2013.                   if (wanttty > 0)
  2014.                       (void) ioctl(FSHTTY, TIOCSPGRP,
  2015.                           (char *)&pgrp);
  2016. ***************
  2017. *** 192,197
  2018.                           (char *)&pgrp);
  2019.                   if (wanttty >= 0 && tpgrp >= 0)
  2020.                       (void) setpgrp(0, pgrp);
  2021.                   if (tpgrp > 0)
  2022.                       tpgrp = 0;
  2023.                   if (t->t_dflg & FNOHUP)
  2024.  
  2025. --- 193,199 -----
  2026.                           (char *)&pgrp);
  2027.                   if (wanttty >= 0 && tpgrp >= 0)
  2028.                       (void) setpgrp(0, pgrp);
  2029. + #endif    BSDJOBS
  2030.                   if (tpgrp > 0)
  2031.                       tpgrp = 0;
  2032.                   if (t->t_dflg & FNOHUP)
  2033. *** sh.set.c    Thu Jun  6 13:15:54 1985
  2034. --- /usr/src/local/tcsh/sh.set.c    Thu Sep 24 15:03:28 1987
  2035. ***************
  2036. *** 81,87
  2037.   
  2038.               HIST = *p++;
  2039.               HISTSUB = *p;
  2040. !         } else if (eq(vp, "user"))
  2041.               setenv("USER", value(vp));
  2042.           else if (eq(vp, "term"))
  2043.               setenv("TERM", value(vp));
  2044.  
  2045. --- 81,87 -----
  2046.   
  2047.               HIST = *p++;
  2048.               HISTSUB = *p;
  2049. !         } else if (eq(vp, "user")) {
  2050.               setenv("USER", value(vp));
  2051.           } else if (eq(vp, "term")) {
  2052.               setenv("TERM", value(vp));
  2053. ***************
  2054. *** 83,89
  2055.               HISTSUB = *p;
  2056.           } else if (eq(vp, "user"))
  2057.               setenv("USER", value(vp));
  2058. !         else if (eq(vp, "term"))
  2059.               setenv("TERM", value(vp));
  2060.           else if (eq(vp, "home"))
  2061.               setenv("HOME", value(vp));
  2062.  
  2063. --- 83,89 -----
  2064.               HISTSUB = *p;
  2065.           } else if (eq(vp, "user")) {
  2066.               setenv("USER", value(vp));
  2067. !         } else if (eq(vp, "term")) {
  2068.               setenv("TERM", value(vp));
  2069.               ed_Init(); /* reset the editor */
  2070.           } else if (eq(vp, "home")) {
  2071. ***************
  2072. *** 85,91
  2073.               setenv("USER", value(vp));
  2074.           else if (eq(vp, "term"))
  2075.               setenv("TERM", value(vp));
  2076. !         else if (eq(vp, "home"))
  2077.               setenv("HOME", value(vp));
  2078.   #ifdef FILEC
  2079.           else if (eq(vp, "filec"))
  2080.  
  2081. --- 85,92 -----
  2082.               setenv("USER", value(vp));
  2083.           } else if (eq(vp, "term")) {
  2084.               setenv("TERM", value(vp));
  2085. !             ed_Init(); /* reset the editor */
  2086. !         } else if (eq(vp, "home")) {
  2087.               setenv("HOME", value(vp));
  2088.           }
  2089.       } while (p = *v++);
  2090. ***************
  2091. *** 87,96
  2092.               setenv("TERM", value(vp));
  2093.           else if (eq(vp, "home"))
  2094.               setenv("HOME", value(vp));
  2095. ! #ifdef FILEC
  2096. !         else if (eq(vp, "filec"))
  2097. !             filec = 1;
  2098. ! #endif
  2099.       } while (p = *v++);
  2100.   }
  2101.   
  2102.  
  2103. --- 88,94 -----
  2104.               ed_Init(); /* reset the editor */
  2105.           } else if (eq(vp, "home")) {
  2106.               setenv("HOME", value(vp));
  2107. !         }
  2108.       } while (p = *v++);
  2109.   }
  2110.   
  2111. ***************
  2112. *** 435,444
  2113.           HIST = '!';
  2114.           HISTSUB = '^';
  2115.       }
  2116. - #ifdef FILEC
  2117. -     if (adrof("filec") == 0)
  2118. -         filec = 0;
  2119. - #endif
  2120.   }
  2121.   
  2122.   unset1(v, head)
  2123.  
  2124. --- 433,438 -----
  2125.           HIST = '!';
  2126.           HISTSUB = '^';
  2127.       }
  2128.   }
  2129.   
  2130.   unset1(v, head)
  2131. *** sh.time.c    Tue May 13 01:07:31 1986
  2132. --- /usr/src/local/tcsh/sh.time.c    Mon Aug 17 21:32:45 1987
  2133. ***************
  2134. *** 16,21
  2135.   
  2136.   settimes()
  2137.   {
  2138.       struct rusage ruch;
  2139.   
  2140.       (void) gettimeofday(&time0, (struct timezone *)0);
  2141.  
  2142. --- 16,22 -----
  2143.   
  2144.   settimes()
  2145.   {
  2146. + #ifndef OREO
  2147.       struct rusage ruch;
  2148.   #endif
  2149.   
  2150. ***************
  2151. *** 17,22
  2152.   settimes()
  2153.   {
  2154.       struct rusage ruch;
  2155.   
  2156.       (void) gettimeofday(&time0, (struct timezone *)0);
  2157.       (void) getrusage(RUSAGE_SELF, &ru0);
  2158.  
  2159. --- 18,24 -----
  2160.   {
  2161.   #ifndef OREO
  2162.       struct rusage ruch;
  2163. + #endif
  2164.   
  2165.       (void) gettimeofday(&time0, (struct timezone *)0);
  2166.   #ifndef    OREO
  2167. ***************
  2168. *** 19,24
  2169.       struct rusage ruch;
  2170.   
  2171.       (void) gettimeofday(&time0, (struct timezone *)0);
  2172.       (void) getrusage(RUSAGE_SELF, &ru0);
  2173.       (void) getrusage(RUSAGE_CHILDREN, &ruch);
  2174.       ruadd(&ru0, &ruch);
  2175.  
  2176. --- 21,27 -----
  2177.   #endif
  2178.   
  2179.       (void) gettimeofday(&time0, (struct timezone *)0);
  2180. + #ifndef    OREO
  2181.       (void) getrusage(RUSAGE_SELF, &ru0);
  2182.       (void) getrusage(RUSAGE_CHILDREN, &ruch);
  2183.       ruadd(&ru0, &ruch);
  2184. ***************
  2185. *** 22,27
  2186.       (void) getrusage(RUSAGE_SELF, &ru0);
  2187.       (void) getrusage(RUSAGE_CHILDREN, &ruch);
  2188.       ruadd(&ru0, &ruch);
  2189.   }
  2190.   
  2191.   /*
  2192.  
  2193. --- 25,31 -----
  2194.       (void) getrusage(RUSAGE_SELF, &ru0);
  2195.       (void) getrusage(RUSAGE_CHILDREN, &ruch);
  2196.       ruadd(&ru0, &ruch);
  2197. + #endif OREO
  2198.   }
  2199.   
  2200.   /*
  2201. ***************
  2202. *** 30,35
  2203.    */
  2204.   dotime()
  2205.   {
  2206.       struct timeval timedol;
  2207.       struct rusage ru1, ruch;
  2208.   
  2209.  
  2210. --- 34,40 -----
  2211.    */
  2212.   dotime()
  2213.   {
  2214. + #ifndef OREO
  2215.       struct timeval timedol;
  2216.       struct rusage ru1, ruch;
  2217.   
  2218. ***************
  2219. *** 38,43
  2220.       ruadd(&ru1, &ruch);
  2221.       (void) gettimeofday(&timedol, (struct timezone *)0);
  2222.       prusage(&ru0, &ru1, &timedol, &time0);
  2223.   }
  2224.   
  2225.   /*
  2226.  
  2227. --- 43,49 -----
  2228.       ruadd(&ru1, &ruch);
  2229.       (void) gettimeofday(&timedol, (struct timezone *)0);
  2230.       prusage(&ru0, &ru1, &timedol, &time0);
  2231. + #endif
  2232.   }
  2233.   
  2234.   /*
  2235. ***************
  2236. *** 57,62
  2237.       (void) setpriority(PRIO_PROCESS, 0, nval);
  2238.   }
  2239.   
  2240.   ruadd(ru, ru2)
  2241.       register struct rusage *ru, *ru2;
  2242.   {
  2243.  
  2244. --- 63,69 -----
  2245.       (void) setpriority(PRIO_PROCESS, 0, nval);
  2246.   }
  2247.   
  2248. + #ifndef OREO
  2249.   ruadd(ru, ru2)
  2250.       register struct rusage *ru, *ru2;
  2251.   {
  2252. ***************
  2253. *** 155,160
  2254.       }
  2255.       putchar('\n');
  2256.   }
  2257.   
  2258.   pdeltat(t1, t0)
  2259.       struct timeval *t1, *t0;
  2260.  
  2261. --- 162,168 -----
  2262.       }
  2263.       putchar('\n');
  2264.   }
  2265. + #endif
  2266.   
  2267.   pdeltat(t1, t0)
  2268.       struct timeval *t1, *t0;
  2269. *** Makefile    Thu Sep 24 15:24:33 1987
  2270. --- /usr/src/local/tcsh/Makefile    Mon Aug 17 21:53:45 1987
  2271. ***************
  2272. *** 37,43
  2273.   
  2274.   # on some machines, the alloc.c works.  On others, it dosn't.  Besides, 
  2275.   # nmalloc is much faster...
  2276. ! ALLOC=nmalloc.o
  2277.   
  2278.   SHOBJS=    sh.o sh.dir.o sh.dol.o sh.err.o sh.exec.o \
  2279.       sh.exp.o sh.func.o sh.glob.o sh.hist.o sh.init.o sh.lex.o sh.misc.o \
  2280.  
  2281. --- 37,43 -----
  2282.   
  2283.   # on some machines, the alloc.c works.  On others, it dosn't.  Besides, 
  2284.   # nmalloc is much faster...
  2285. ! ALLOC=alloc.o
  2286.   
  2287.   SHOBJS=    sh.o sh.char.o sh.dir.o sh.dol.o sh.err.o \
  2288.       sh.exec.o sh.exp.o sh.file.o sh.func.o sh.glob.o sh.hist.o sh.init.o \
  2289. ***************
  2290. *** 39,47
  2291.   # nmalloc is much faster...
  2292.   ALLOC=nmalloc.o
  2293.   
  2294. ! SHOBJS=    sh.o sh.dir.o sh.dol.o sh.err.o sh.exec.o \
  2295. !     sh.exp.o sh.func.o sh.glob.o sh.hist.o sh.init.o sh.lex.o sh.misc.o \
  2296. !     sh.parse.o sh.print.o sh.proc.o sh.sem.o sh.set.o sh.sig.o sh.time.o
  2297.   
  2298.   TWOBJS=    tw.help.o tw.init.o tw.parse.o tw.spell.o
  2299.   
  2300.  
  2301. --- 39,48 -----
  2302.   # nmalloc is much faster...
  2303.   ALLOC=alloc.o
  2304.   
  2305. ! SHOBJS=    sh.o sh.char.o sh.dir.o sh.dol.o sh.err.o \
  2306. !     sh.exec.o sh.exp.o sh.file.o sh.func.o sh.glob.o sh.hist.o sh.init.o \
  2307. !     sh.lex.o sh.misc.o sh.parse.o sh.print.o sh.proc.o sh.sem.o sh.set.o \
  2308. !     sh.time.o
  2309.   
  2310.   TWOBJS=    tw.help.o tw.init.o tw.parse.o tw.spell.o
  2311.   
  2312. ***************
  2313. *** 61,67
  2314.       rm -f tcsh.ps
  2315.       -ptroff -man tcsh.1 > tcsh.ps
  2316.   
  2317. ! ${SHOBJS}: sh.h sh.local.h
  2318.   
  2319.   ${TWOBJS}: sh.h sh.local.h tw.h
  2320.   
  2321.  
  2322. --- 62,68 -----
  2323.       rm -f tcsh.ps
  2324.       -ptroff -man tcsh.1 > tcsh.ps
  2325.   
  2326. ! # ${SHOBJS}: sh.h sh.local.h
  2327.   
  2328.   ${TWOBJS}: sh.h sh.local.h tw.h
  2329.   
  2330. ***************
  2331. *** 124,126
  2332.   
  2333.   tags:    /tmp
  2334.       ${CTAGS} sh*.c
  2335.  
  2336. --- 125,148 -----
  2337.   
  2338.   tags:    /tmp
  2339.       ${CTAGS} sh*.c
  2340. + 
  2341. + sh.o: sh.h sh.local.h sh.char.h
  2342. + sh.char.o: sh.char.h
  2343. + sh.dir.o: sh.h sh.local.h sh.dir.h
  2344. + sh.dol.o: sh.h sh.local.h sh.char.h
  2345. + sh.err.o: sh.h sh.local.h sh.char.h
  2346. + sh.exec.o: sh.h sh.local.h sh.char.h
  2347. + sh.exp.o: sh.h sh.local.h sh.char.h
  2348. + sh.file.o: sh.h sh.local.h sh.char.h
  2349. + sh.func.o: sh.h sh.local.h sh.char.h
  2350. + sh.glob.o: sh.h sh.local.h sh.char.h
  2351. + sh.hist.o: sh.h sh.local.h sh.char.h
  2352. + sh.init.o: sh.local.h
  2353. + sh.lex.o: sh.h sh.local.h sh.char.h
  2354. + sh.misc.o: sh.h sh.local.h sh.char.h
  2355. + sh.parse.o: sh.h sh.local.h sh.char.h
  2356. + sh.print.o: sh.h sh.local.h sh.char.h
  2357. + sh.proc.o: sh.h sh.local.h sh.dir.h sh.proc.h sh.char.h
  2358. + sh.sem.o: sh.h sh.local.h sh.proc.h sh.char.h
  2359. + sh.set.o: sh.h sh.local.h sh.char.h
  2360. + sh.time.o: sh.h sh.local.h sh.char.h
  2361. *** ed.init.c    Thu Sep 24 15:24:43 1987
  2362. --- /usr/src/local/tcsh/ed.init.c    Mon Aug 31 09:26:09 1987
  2363. ***************
  2364. *** 86,92
  2365.       nlc.t_lnextc = CTRL(v);    /* literal next character */
  2366.   
  2367.   #  ifdef SIGWINCH
  2368. !     sigset(SIGWINCH, window_change); /* for window systems */
  2369.   #  endif
  2370.   # endif OREO
  2371.   #else SVID
  2372.  
  2373. --- 86,92 -----
  2374.       nlc.t_lnextc = CTRL(v);    /* literal next character */
  2375.   
  2376.   #  ifdef SIGWINCH
  2377. !     signal(SIGWINCH, window_change); /* for window systems */
  2378.   #  endif
  2379.   # endif OREO
  2380.   #else SVID
  2381. ***************
  2382. *** 135,141
  2383.       nlc.t_lnextc = CTRL(v);    /* literal next character */
  2384.   
  2385.   # ifdef SIGWINCH
  2386. !     sigset(SIGWINCH, window_change); /* for window systems */
  2387.   # endif
  2388.   #endif SVID
  2389.       }
  2390.  
  2391. --- 135,141 -----
  2392.       nlc.t_lnextc = CTRL(v);    /* literal next character */
  2393.   
  2394.   # ifdef SIGWINCH
  2395. !     signal(SIGWINCH, window_change); /* for window systems */
  2396.   # endif
  2397.   #endif SVID
  2398.       }
  2399. ***************
  2400. *** 190,196
  2401.       }
  2402.   
  2403.       xb.sg_erase = '\177';    /* del prev. char == DEL */
  2404. !     xb.sg_kill = CTRL(w);    /* special case of del region */
  2405.   
  2406.       xtc.t_intrc = CTRL(c);    /* SIGINTR */
  2407.       xtc.t_quitc = CTRL(\\);    /* SIGQUIT */
  2408.  
  2409. --- 190,196 -----
  2410.       }
  2411.   
  2412.       xb.sg_erase = '\177';    /* del prev. char == DEL */
  2413. !     xb.sg_kill = CTRL(u);    /* special case of del region */
  2414.   
  2415.       xtc.t_intrc = CTRL(c);    /* SIGINTR */
  2416.       xtc.t_quitc = CTRL(\\);    /* SIGQUIT */
  2417. *** ed.inputl.c    Thu Sep 24 15:24:45 1987
  2418. --- /usr/src/local/tcsh/ed.inputl.c    Thu Sep 17 23:24:16 1987
  2419. ***************
  2420. *** 212,218
  2421.   
  2422.       hp = Histlist.Hnext;
  2423.       if (hp == (struct Hist *)0) {
  2424. !     printf ("no hp\n");
  2425.       Beep();
  2426.       return;
  2427.       }
  2428.  
  2429. --- 212,218 -----
  2430.   
  2431.       hp = Histlist.Hnext;
  2432.       if (hp == (struct Hist *)0) {
  2433. !     printf ("No history pointer, probably no history\n");
  2434.       Beep();
  2435.       return;
  2436.       }
  2437. *** ed.screen.c    Thu Sep 24 15:25:04 1987
  2438. --- /usr/src/local/tcsh/ed.screen.c    Mon Aug 17 23:51:23 1987
  2439. ***************
  2440. *** 55,61
  2441.   
  2442.       if (where > TermV) {
  2443.   #ifdef DEBUG_SCREEN
  2444. !     printf ("MoveToLine: where is riduculous: %d\r\n", where);
  2445.       flush();
  2446.   #endif
  2447.       return;
  2448.  
  2449. --- 55,61 -----
  2450.   
  2451.       if (where > TermV) {
  2452.   #ifdef DEBUG_SCREEN
  2453. !     printf ("MoveToLine: where is ridiculous: %d\r\n", where);
  2454.       flush();
  2455.   #endif
  2456.       return;
  2457. ***************
  2458. *** 240,245
  2459.       char *area = buffer;
  2460.       char *MyTerm;
  2461.       char *getenv();
  2462.   
  2463.   #ifdef SIGWINCH
  2464.       sighold(SIGWINCH);        /* don't want to confuse things here */
  2465.  
  2466. --- 240,246 -----
  2467.       char *area = buffer;
  2468.       char *MyTerm;
  2469.       char *getenv();
  2470. +     int    omask;
  2471.   
  2472.   #ifdef SIGWINCH
  2473.       omask = sighold(SIGWINCH);        /* don't want to confuse things here */
  2474. ***************
  2475. *** 242,248
  2476.       char *getenv();
  2477.   
  2478.   #ifdef SIGWINCH
  2479. !     sighold(SIGWINCH);        /* don't want to confuse things here */
  2480.   #endif
  2481.   
  2482.       MyTerm = getenv("TERM");
  2483.  
  2484. --- 243,249 -----
  2485.       int    omask;
  2486.   
  2487.   #ifdef SIGWINCH
  2488. !     omask = sighold(SIGWINCH);        /* don't want to confuse things here */
  2489.   #endif
  2490.   
  2491.       MyTerm = getenv("TERM");
  2492. ***************
  2493. *** 355,361
  2494.       ClearDisp();
  2495.   
  2496.   #ifdef SIGWINCH
  2497. !     sigrelse(SIGWINCH);        /* can change it again */
  2498.   #endif
  2499.   }
  2500.   
  2501.  
  2502. --- 356,362 -----
  2503.       ClearDisp();
  2504.   
  2505.   #ifdef SIGWINCH
  2506. !     sigsetmask(omask);
  2507.   #endif
  2508.   }
  2509.   
  2510. ***************
  2511. *** 396,401
  2512.       ClearDisp();
  2513.   
  2514.   #ifdef SIGWINCH
  2515. !     sigrelse(SIGWINCH);        /* can change it again */
  2516.   #endif
  2517.   }
  2518.  
  2519. --- 397,403 -----
  2520.       ClearDisp();
  2521.   
  2522.   #ifdef SIGWINCH
  2523. !     (void) sigsetmask(sigblock(0) & ~sigmask(SIGWINCH));
  2524.   #endif
  2525.   }
  2526.   
  2527. ***************
  2528. *** 399,401
  2529.       sigrelse(SIGWINCH);        /* can change it again */
  2530.   #endif
  2531.   }
  2532.  
  2533. --- 400,409 -----
  2534.       (void) sigsetmask(sigblock(0) & ~sigmask(SIGWINCH));
  2535.   #endif
  2536.   }
  2537. + 
  2538. + 
  2539. + 
  2540. + 
  2541. + 
  2542. + 
  2543. + 
  2544. *** pwprintf.c    Thu Sep 24 15:25:07 1987
  2545. --- /usr/src/local/tcsh/pwprintf.c    Mon Aug 17 22:24:47 1987
  2546. ***************
  2547. *** 1,7
  2548.   /* A public-domain, minimal printf routine that prints through the putchar()
  2549.      routine.  Feel free to use for anything...  -- 7/17/87 Paul Placeway */
  2550.   
  2551. ! #include <ctype.h>
  2552.   #include <varargs.h>
  2553.   
  2554.   /* use varargs since it's the RIGHT WAY, and assuming things about parameters
  2555.  
  2556. --- 1,9 -----
  2557.   /* A public-domain, minimal printf routine that prints through the putchar()
  2558.      routine.  Feel free to use for anything...  -- 7/17/87 Paul Placeway */
  2559.   
  2560. ! #include "sh.h"
  2561. ! /*#include <ctype.h>*/
  2562. ! #include "sh.char.h"
  2563.   #include <varargs.h>
  2564.   
  2565.   /* use varargs since it's the RIGHT WAY, and assuming things about parameters
  2566. *** sh.nfunc.c    Thu Sep 24 15:24:30 1987
  2567. --- /usr/src/local/tcsh/sh.nfunc.c    Mon Aug 17 23:19:24 1987
  2568. ***************
  2569. *** 7,12
  2570.   #include "tw.h"
  2571.   
  2572.   #include <sys/ioctl.h>
  2573.   
  2574.   static int parsekey();
  2575.   static char *unparsekey();
  2576.  
  2577. --- 7,13 -----
  2578.   #include "tw.h"
  2579.   
  2580.   #include <sys/ioctl.h>
  2581. + #include "sh.char.h"
  2582.   
  2583.   static int parsekey();
  2584.   static char *unparsekey();
  2585. ***************
  2586. *** 11,16
  2587.   static int parsekey();
  2588.   static char *unparsekey();
  2589.   
  2590.   /*
  2591.    * Tops-C shell
  2592.    */
  2593.  
  2594. --- 12,19 -----
  2595.   static int parsekey();
  2596.   static char *unparsekey();
  2597.   
  2598. + extern    int    tglob(), trim();
  2599. + 
  2600.   /*
  2601.    * Tops-C shell
  2602.    */
  2603. ***************
  2604. *** 344,350
  2605.       struct stat statb;
  2606.       
  2607.       if (setintr)
  2608. !     sigrelse(SIGINT);
  2609.   
  2610.       if (*++v == NULL) {
  2611.       t_search("", (char *)0, LIST, 0, 0);
  2612.  
  2613. --- 347,353 -----
  2614.       struct stat statb;
  2615.       
  2616.       if (setintr)
  2617. !         (void) sigsetmask(sigblock(0) & ~sigmask(SIGINT));
  2618.   
  2619.       if (*++v == NULL) {
  2620.       t_search("", (char *)0, LIST, 0, 0);
  2621. ***************
  2622. *** 356,362
  2623.       if (v == 0)
  2624.           bferr("No match");
  2625.       } else
  2626. !     scan(v, trim);
  2627.       k = 0;
  2628.       if (*(v+1))
  2629.       f = 1;
  2630.  
  2631. --- 359,368 -----
  2632.       if (v == 0)
  2633.           bferr("No match");
  2634.       } else
  2635. !         /*
  2636. !         scan(v, trim);
  2637. !         */
  2638. !         trim(v);
  2639.       k = 0;
  2640.       if (*(v+1))
  2641.       f = 1;
  2642. *** tw.h    Thu Sep 24 15:25:11 1987
  2643. --- /usr/src/local/tcsh/tw.h    Mon Aug 17 23:15:06 1987
  2644. ***************
  2645. *** 1,3
  2646.   #ifdef MAKE_TWENEX
  2647.   
  2648.   #define FREE_ITEMS(items,num)\
  2649.  
  2650. --- 1,4 -----
  2651. + 
  2652.   #ifdef MAKE_TWENEX
  2653.   
  2654.   #define FREE_ITEMS(items,num)\
  2655. ***************
  2656. *** 2,8
  2657.   
  2658.   #define FREE_ITEMS(items,num)\
  2659.   {\
  2660. !     sighold (SIGINT);\
  2661.       free_items (items,num);\
  2662.       items = NULL;\
  2663.       sigrelse (SIGINT);\
  2664.  
  2665. --- 3,10 -----
  2666.   
  2667.   #define FREE_ITEMS(items,num)\
  2668.   {\
  2669. !     int    omask;\
  2670. !     omask = sighold (SIGINT);\
  2671.       free_items (items,num);\
  2672.       items = NULL;\
  2673.       sigsetmask(omask);\
  2674. ***************
  2675. *** 5,11
  2676.       sighold (SIGINT);\
  2677.       free_items (items,num);\
  2678.       items = NULL;\
  2679. !     sigrelse (SIGINT);\
  2680.   }
  2681.   
  2682.   #define FREE_DIR(fd)\
  2683.  
  2684. --- 7,13 -----
  2685.       omask = sighold (SIGINT);\
  2686.       free_items (items,num);\
  2687.       items = NULL;\
  2688. !     sigsetmask(omask);\
  2689.   }
  2690.   
  2691.   #define FREE_DIR(fd)\
  2692. ***************
  2693. *** 10,16
  2694.   
  2695.   #define FREE_DIR(fd)\
  2696.   {\
  2697. !     sighold (SIGINT);\
  2698.       closedir (fd);\
  2699.       fd = NULL;\
  2700.       sigrelse (SIGINT);\
  2701.  
  2702. --- 12,19 -----
  2703.   
  2704.   #define FREE_DIR(fd)\
  2705.   {\
  2706. !     int    omask;\
  2707. !     omask = sighold (SIGINT);\
  2708.       closedir (fd);\
  2709.       fd = NULL;\
  2710.       sigsetmask(omask);\
  2711. ***************
  2712. *** 13,19
  2713.       sighold (SIGINT);\
  2714.       closedir (fd);\
  2715.       fd = NULL;\
  2716. !     sigrelse (SIGINT);\
  2717.   }
  2718.   
  2719.   #define TRUE        1
  2720.  
  2721. --- 16,22 -----
  2722.       omask = sighold (SIGINT);\
  2723.       closedir (fd);\
  2724.       fd = NULL;\
  2725. !     sigsetmask(omask);\
  2726.   }
  2727.   
  2728.   #define TRUE        1
  2729. *** tw.help.c    Thu Sep 24 15:25:13 1987
  2730. --- /usr/src/local/tcsh/tw.help.c    Mon Aug 17 23:16:22 1987
  2731. ***************
  2732. *** 3,9
  2733.   #include "tw.h"
  2734.   #include "sh.h"
  2735.   
  2736. - 
  2737.   /* actually look up and print documentation on a file.  Look down the path
  2738.      for an approiate file, then print it.  Note that the printing is NOT 
  2739.      PAGED.  This is because the function is NOT ment to look at manual pages,
  2740.  
  2741. --- 3,8 -----
  2742.   #include "tw.h"
  2743.   #include "sh.h"
  2744.   
  2745.   /* actually look up and print documentation on a file.  Look down the path
  2746.      for an appropriate file, then print it.  Note that the printing is NOT 
  2747.      PAGED.  This is because the function is NOT ment to look at manual pages,
  2748. ***************
  2749. *** 5,11
  2750.   
  2751.   
  2752.   /* actually look up and print documentation on a file.  Look down the path
  2753. !    for an approiate file, then print it.  Note that the printing is NOT 
  2754.      PAGED.  This is because the function is NOT ment to look at manual pages,
  2755.      it only does so if there is no .help file to look in. */
  2756.   
  2757.  
  2758. --- 4,10 -----
  2759.   #include "sh.h"
  2760.   
  2761.   /* actually look up and print documentation on a file.  Look down the path
  2762. !    for an appropriate file, then print it.  Note that the printing is NOT 
  2763.      PAGED.  This is because the function is NOT ment to look at manual pages,
  2764.      it only does so if there is no .help file to look in. */
  2765.   
  2766. *** tw.init.c    Thu Sep 24 15:25:15 1987
  2767. --- /usr/src/local/tcsh/tw.init.c    Thu Sep 24 15:45:32 1987
  2768. ***************
  2769. *** 120,125
  2770.       register char *cp;
  2771.       register struct biltins *bptr;
  2772.   
  2773.       for (bptr = bfunc; cp = bptr->bname; bptr++) {
  2774.       tw_add_comm_name (cp);
  2775.       }
  2776.  
  2777. --- 120,127 -----
  2778.       register char *cp;
  2779.       register struct biltins *bptr;
  2780.   
  2781. +     for (bptr = bfunc; bptr < &bfunc[nbfunc]; bptr++) {
  2782. + #ifdef    OUTDEF
  2783.       for (bptr = bfunc; cp = bptr->bname; bptr++) {
  2784.   #endif
  2785.       tw_add_comm_name (cp);
  2786. ***************
  2787. *** 121,126
  2788.       register struct biltins *bptr;
  2789.   
  2790.       for (bptr = bfunc; cp = bptr->bname; bptr++) {
  2791.       tw_add_comm_name (cp);
  2792.       }
  2793.   }
  2794.  
  2795. --- 123,129 -----
  2796.       for (bptr = bfunc; bptr < &bfunc[nbfunc]; bptr++) {
  2797.   #ifdef    OUTDEF
  2798.       for (bptr = bfunc; cp = bptr->bname; bptr++) {
  2799. + #endif
  2800.       tw_add_comm_name (cp);
  2801.       }
  2802.   }
  2803. ***************
  2804. *** 127,132
  2805.   
  2806.   tw_add_aliases ()
  2807.   {
  2808.       register struct varent *vp;
  2809.   
  2810.       vp = &aliases;
  2811.  
  2812. --- 130,161 -----
  2813.   
  2814.   tw_add_aliases ()
  2815.   {
  2816. +     register struct varent *p;
  2817. +     register struct varent *c;
  2818. + 
  2819. +     p = &aliases;
  2820. +     for (;;) {
  2821. +         while (p->v_left)
  2822. +             p = p->v_left;
  2823. +     x:
  2824. +         if (p->v_parent == 0)        /* is it the header? */
  2825. +             return;
  2826. +         tw_add_comm_name(p->v_name);
  2827. +         if (p->v_right) {
  2828. +             p = p->v_right;
  2829. +             continue;
  2830. +         }
  2831. +         do {
  2832. +             c = p;
  2833. +             p = p->v_parent;
  2834. +         } while (p->v_right == c);
  2835. +         goto x;
  2836. +     }
  2837. + }
  2838. + 
  2839. + #ifdef    OUTDEF
  2840. + tw_add_aliases ()
  2841. + {
  2842.       register struct varent *vp;
  2843.   
  2844.       vp = &aliases;
  2845. ***************
  2846. *** 136,138
  2847.       }
  2848.   
  2849.   }
  2850.  
  2851. --- 165,169 -----
  2852.       }
  2853.   
  2854.   }
  2855. + #endif
  2856. + 
  2857. *** tw.parse.c    Thu Sep 24 15:25:19 1987
  2858. --- /usr/src/local/tcsh/tw.parse.c    Thu Sep 24 15:46:59 1987
  2859. ***************
  2860. *** 64,70
  2861.   /*  printf ("\ncmd_st:%s:\nword_start:%s:\n", cmd_st, word_start); */
  2862.                   /* for debugging */
  2863.       if (command == RECOGNIZE) {
  2864. !         search_ret = t_search (word, wp, command, space_left, is_a_cmd);
  2865.       if (InsertStr(wp) < 0)    /* put it in the input buffer */
  2866.           return 2;        /* error inserting */
  2867.       return search_ret;
  2868.  
  2869. --- 64,70 -----
  2870.   /*  printf ("\ncmd_st:%s:\nword_start:%s:\n", cmd_st, word_start); */
  2871.                   /* for debugging */
  2872.       if (command == RECOGNIZE) {
  2873. !     search_ret = t_search (word, wp, command, space_left, is_a_cmd);
  2874.       if (InsertStr(wp) < 0)    /* put it in the input buffer */
  2875.           return 2;        /* error inserting */
  2876.       return search_ret;
  2877. ***************
  2878. *** 200,206
  2879.       numitems = 0;
  2880.       if (dir_fd != NULL)
  2881.       FREE_DIR (dir_fd);
  2882. - 
  2883.       looking_for_lognames = (*word == '~') && (index (word, '/') == NULL);
  2884.       looking_for_command &= (*word != '~') && (index (word, '/') == NULL);
  2885.   
  2886.  
  2887. --- 200,205 -----
  2888.       numitems = 0;
  2889.       if (dir_fd != NULL)
  2890.       FREE_DIR (dir_fd);
  2891.       looking_for_lognames = (*word == '~') && (index (word, '/') == NULL);
  2892.       looking_for_command &= (*word != '~') && (index (word, '/') == NULL);
  2893.   
  2894. ***************
  2895. *** 206,212
  2896.   
  2897.       dot_got = FALSE;
  2898.       stat (".", &dot_statb);
  2899. - 
  2900.       if (looking_for_lognames) {            /* Looking for login names? */
  2901.       setpwent ();                /* Open passwd file */
  2902.       copyn (name, &word[1], MAXNAMLEN);    /* name sans ~ */
  2903.  
  2904. --- 205,210 -----
  2905.   
  2906.       dot_got = FALSE;
  2907.       stat (".", &dot_statb);
  2908.       if (looking_for_lognames) {            /* Looking for login names? */
  2909.       setpwent ();                /* Open passwd file */
  2910.       copyn (name, &word[1], MAXNAMLEN);    /* name sans ~ */
  2911. *** tw.spell.c    Thu Sep 24 15:24:53 1987
  2912. --- /usr/src/local/tcsh/tw.spell.c    Mon Aug 17 23:00:23 1987
  2913. ***************
  2914. *** 1,4
  2915. - #include "sh.h"
  2916.   #define MAKE_TWENEX
  2917.   #include "tw.h"
  2918.   
  2919.  
  2920. --- 1,3 -----
  2921.   #define MAKE_TWENEX
  2922.   #include "tw.h"
  2923.   
  2924. SHAR_EOF
  2925. fi
  2926. exit 0
  2927. #    End of shell archive
  2928.